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Preface 


On first thought, it might seem strange that another book on the 8080 and 
Z-80 should appear at this time. Z-80 CPU cards generally became available 
in 1977 and the 8080 CPU is even older. But the Z-80 computer seems to 
become more popular with time. For example, the TRS-80 Model II an- 
nounced recently by Radio Shack, and Heath’s H-89 both use the CPU. 
High-level languages such as Pascal, APL, BASIC, FORTRAN, and C are now 
run on the 8080 and Z-80. Furthermore, Microsoft has available a Z-80 CPU 
card that can be easily inserted into the Apple II computer. There should be 
an increasing interest in the 8080 and Z-80 CPUs in the coming years, and I 
believe, a great increase in the number of 8080 and Z-80 programmers. So, 
there is a growing need for a book that covers programming for the 8080 
and Z-80 assembly languages. 

The combination of 8080 and Z-80 programming concepts into a single 
work is quite natural. The Z-80 CPU is upward compatible from the 8080 
so that all commercially available 8080 software will run on the Z-80. 
Furthermore, 8080 assemblers, such as ASM provided with CP/M, can be 
used to create programs that will run on either an 8080 system or a Z-80 
system. 

The purpose of this book is twofold. First, I want to provide a single 
reference source for both 8080 and Z-80 assembly language programmers. 
The appendixes are designed with this goal in mind. They begin with the 
ASCII character set and a 64K memory map. These two appendixes are as 
useful to those using higher level languages as they are to assembly language 
programmers. 

The 8080 and Z-80 instruction sets are listed both alphabetically and 
numerically in the next four appendixes. This is followed by a cross refer- 
ence between the 8080 and the Z-80 mnemonics. An appendix describing 
each instruction in detail then follows. Common acronyms are identified 
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next in Appendix I, and some undocumented Z-80 instructions are dis- 
cussed in the final appendix. Collectively, the appendixes contain all of the 
reference material needed to write 8080 or Z-80 assembly language programs. 

The second purpose of this work is to demonstrate some useful tech- 
niques of assembly language programming. As an editor for Interface Age, I 
have seen numerous examples of inefficient or improper programming. 
General principles of assembly language programming are discussed in 
Chapters One through Five; specific programming examples are given in 
Chapters Five through Ten. The reader can actually assemble the programs 
and try them out. 

The organization and operation of the 8080 and Z-80 CPUs is covered 
in Chapter One. This includes a discussion of the general-purpose registers, 
the flag registers, logical operations, branching, double-register operations, 
rotation and shifting. The concepts of hexadecimal, octal, and binary num- 
bers, one’s and two’s complement arithmetic, and the use of logical opera- 
tions are presented in Chapter Two. 

Stack operations with PUSH, POP, CALL and RET commands and the 
passing of data between calling program and subroutine are given in Chapter 
Three. Chapter Four is devoted to input and output techniques, including 
an interrupt-dirven keyboard routine and a telephone transmission program. 
Assembler macros are discussed in Chapter Five. Examples show how to 
generate Z-80 instructions with an 8080 macro assembler, and how to emu- 
late Z-80 instructions on an 8080 CPU. 

The reader can develop a small, powerful monitor in Chapter Six using 
the top-down programming method. The monitor contains the usual com- 
mands of dump, load, and go. In addition, there is a memory test, a routine 
to search for one or two hex bytes or ASCII characters, a routine to replace 
all occurrences of one byte with another, and a routine to perform input 
and output through any port. 

In Chapter Seven the monitor is converted to Z-80 instructions and 
some additional features are added. Assembly-language subroutines for inter- 
converting between binary numbers and ASCII characters coded in one of 
the common number bases are given in Chapter Eight. These routines per- 
form all of the input and output through the system monitor developed in 
Chapter Six. Paper tape and magnetic tape routines are given in Chapter 
Nine. This method of data transfer is still very popular. I frequently am 
asked to read information on paper tape into our Z-80 computer so that it 
can be transmitted over the telephone line to our campus Dec-20 computer. 

CP/M is currently the most popular 8080/Z-80 operating system. 
Chapter Ten demonstrates how assembly language programs can utilize CP/M 
for all input and output by presenting three programs. One of these pro- 
grams allows the user to branch to any address from the system level. Never- 
theless, the use of CP/M is not the subject of this book. More information on 
the use of the CP/M operating system can be obtained from Using CP/M: A 
Self-Teaching Guide by Judi Fernandez and Ruth Ashley (John Wiley and 
Sons, Inc., 1980). 


The assembly language programs in this book have all been assembled 
on an Altair 8800, with an Ithaca Z-80 CPU card and North Star double- 
density disks. The Lifeboat 2.0 version of CP/M was used as the operating 
system. The system monitor given in Chapter Six was additionally pro- 
grammed to run on a TRS-80 Model II, using a Lifeboart 2.2 version CP/M 
operating system. The alternate version of the input and output routines was 
used in this case. The Digital Research assembler MAC was used for the 8080 
instructions and the Microsoft assembler MACRO-80 was used for the Z-80 
code. All of the assembly listings have been reproduced directly from the 
original computer printouts. The manuscript was created and edited with 
MicroPro’s Word-Master and formatted with Organic Software’s Textwriter. 

Thanks to Heidi for typing the manuscript. Also, I should like to 
acknowledge the programmers at Microsoft, Digital Research, and Lifeboat 
Associates for the many things they have taught me about programming. 


Alan R. Miller 
June 1980 
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CHAPTER ONE 


Introduction 


There was a time when computers were gigantic machines containing racks 
upon racks of vacuum tubes. The invention of the transistor and the devel- 
opment of the integrated circuit (IC) changed all that. Today, it is possible 
to place tens of thousands of transistors on a single ‘“‘chip”’ of silicon that is 
smaller than a quarter of an inch square. As a result of this technology. com- 
puters have become smaller and cheaper. 

Computers are commonly classified into three categories, based on size 
and capability. The largest are known as main frame computers, the middle- 
sized ones are called minicomputers, and the smallest are termed microcom- 
puters. A computer consists of three parts: the central processing unit 
(CPU), the main memory, and the peripherals. 

The CPU directs the activities of the computer by interpreting a set of 
instructions called operation codes, or op codes for short. These instructions 
are located in the main memory. The memory is also used for the storage 
of data. 


The CPU communicates with the user through such peripherals as the 
console, the printer, the disks, and so on. There are several electrical lines 
which are used to connect the CPU to the memory and to the peripherals. 
These lines are collectively known as the buss, or bus. 

The CPU contains a set of registers, which are internal memory locations 
used for data storage and manipulation. One of these is a special register 
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called the accumulator. It receives the results of certain CPU operations. 
The CPU will also have a status register to indicate the nature of a previous 
operation, e.g., whether the result is zero or negative or positive. It will also 
indicate whether a carry or a borrow occurred during the operation. 

Additional registers are used for auxiliary storage. They may contain 
general information such as a number that is about to be added to the 
accumulator. Alternately, a register may contain a number that refers to an 
address in the main memory. The value is called a memory pointer in this 
case. A special portion of main memory may be set aside for storing data. 
This area is called a stack. A special register called a stack pointer refers to 
this region. Another register, the program counter, tells the CPU where to 
find the next instruction in memory. 

Computer operations are controlled by a computer program. Those 
programs which are used to solve engineering and physics problems are called 
application programs. On the other hand, computer programs which deal 
with the operation of the computer’s own peripherals are known as systems 
programs. 

The instruction set used by the CPU can be very large and difficult to 
use. Consequently, symbolic programming languages are commonly used 
instead. An application program may be written in a language such as BASIC, 
FORTRAN, or Pascal. This is called a source program. Then a separate pro- 
cessor program called a compiler or an interpreter is used to convert the 
user’s source program into an object program that corresponds to the in- 
structions needed by the computer. 

A microcomputer’s instruction set is relatively small compared to that 
of a larger computer. But even so, it is more convenient to write systems 
programs in a symbolic language called assembly language, rather than in the 
machine language of the computer. A processor program, called an assem- 
bler, is then utilized to translate the source program into the corresponding 
instructions of the computer. A major difference between assembly language 
and higher-level languages such as Pascal is that each line of an assembly 
language program represents one computer instruction. By contrast, one line 
of a Pascal source program might represent many computer instructions. 

A line of an assembly language program can contain up to four ele- 
ments: the label, the mnemonic, one or two operands, and a comment. 


Label Mnemonic Orerand Comment 
START? CALL FIRST initialize data 


The label, which is usually terminated by a colon, is used to transfer control 
from one portion of the source program to another. The mnemonic repre- 
sents the desired CPU instruction. The operand might reference a CPU 
register, a memory location, or simply a constant. Finally, a comment, pre- 
ceded by a semicolon, can be used to explain the instruction. The comment, 
of course, is ignored by the assembler. 

The remainder of this chapter is devoted to a general discussion of some 
of the features of the 8080 and Z-80 CPUs. The complete instruction sets 
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for these CPUs are listed in the appendix. Specific details of each instruction 
are given in Appendix H. If you are already familiar with these instruction 
sets, then you might want to go on to the next chapter. 


THE 8080 CPU 


The 8080 CPU is an integrated circuit that has 40 pins (legs). It requires 
three power supply voltages—12 V, 5 V, and —5 V, and a two-phase clock 
that runs at 2 Megahertz (MHz). There is an accumulator, a flag register, six 
general-purpose registers, a stack pointer, and a program counter. The 
accumulator is sometimes known as register A. The flag register is usually 
called the PSW (the letters being an acronym for program status word ). The 
general-purpose registers are designated by the letters B, C, D, E, H, and L. 
Sometimes the registers are paired into 16-bit double registers known as BC, 
DE, and HL. The accumulator and flag register may also be paired. There are 
78 different instruction types that produce a total of 245 different op codes. 


Accumulator Ym ma nc oc eo ae  oleateatententtaa tte ! Flad Redister 

(Resister A) ! 8 bits ! 8 bits ! (PSW) 
| -———-  Rostenteatententententententent ! 

Resister B ! 8 bits ! 8 bits ! Resister C 
| ----------- | ----— ! 

Redister D ! 8 bits ! 8 bits ! Resister E 
| —--  Fsteatentententententententon ! 

Resdister H 1 8 bits ! 8 bits ! Resister L 
| --—----- | ---- ! 

Stack Fointer ! 16 bits ! 
I sleateshestntentontentententetentetentoetententeatententeten ! 

Program ! 16 bits ! 

Counter aa aaa ca ! 


Figure 1.1. The 8080 CPU registers. 


Some of the 8080 instructions explicitly refer to the accumulator or to 
one of the general-purpose registers (B, C, D, E, H, and L). 


mnemonic orerand comment 
INR A increment accumulator 
DCR B sdecrement resister B 
MOV H»D move contents of D to H 
MVI Cr4 srPut value of 4 into C 


When there are two operands, data moves from the right operand (the 
source) into the left operand (the destination). There are additional 8080 
commands that implicitly refer to the accumulator. 


mnemonic operand comment 
RAR § rotate accumulator right 
RAL § rotate accumulator left 
IN 0 ¢ inrfut a bute to A from rort O 
OUT 1 ¢ output 2a bute from A to rort 1 
ANI 7 § logical AND with A and 7 
ORI 3 § losdical OR with A and 3 
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For certain 8-bit operations, the accumulator is implicitly one of the 
source registers and will contain the result of the operation. 


mnemonic orerand comment 
ADD Cc + add C to A 
SUB pa] § subtract I! from A 
ANA H § losical AND of A with H 
ORA B § losical OR of A and B 


Other instructions refer to coupled pairs of 8-bit registers. These 
extended operations treat the BC, the DE, and the HL register pairs as 16-bit 
entities. Sometimes the stack pointer and program counter are included in 
these instructions. The X symbol in the mnemonic refers to these extended 
16-bit operations. 


mnemonic operand comment 
INX H increment HL resister rair 
ncx SP decrement stack rointer 
LXI Tyo load zero into DE pair 


Additional instructions deal specifically with the HL register pair. The 
following two instructions move two bytes of data between memory and 
the HL double register. 


mnemonic orerand comment 
LHLD 3 ¢ addr 3» 4 to L and H 
SHLD 3 9 LxH to addr 3, 4 


The LHLD instruction copies the value at memory location 3 into the L 
register and the value at location 4 into the H register. The SHLD operation 
reverses the process. 

The XCHG operation interchanges the 16-bit HL register pair with the 
16-bit DE register pair. 


De eminence ; ieaccesecuccananl 
Jimeno oeceese ' | --------------- ! 

SPHL ! HL resister ! ===> ! stack rointer ! 
| ae ce en ! | ae me ' 

J mem een ene ! Ee teateatententeetentneteieneaianania ! 

PCHL ! HL resister ! ===> ! program ! 


| -------------- ! ! counter ! 


The SPHL command copies the HL register into the stack pointer register. 
The PCHL instruction copies the HL register pair into the program counter 
register. 
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There are several instructions that perform double-register addition. 
The number in one of the 16-bit registers is added to the number in HL. The 
sum appears in the HL register pair. 


DAD D sadd DE to HL 
DAD SF stack pointer + HL 


THE MEMORY REGISTER 


There is another 8-bit register for the 8080 that is not shown in Figure 1.1. 
It is located in main memory. The 16-bit address contained in HL defines 
the location of this memory register, i.e., HL is a memory pointer. The 
instruction 


MOV MrE smove E to memory 


will copy the contents of register E into the memory location pointed to by 
the HL register pair. The instruction 


INR M yincrement memory 


will increment this byte in memory. 


THE FLAG REGISTER 


Four bits of the PSW register can be used to control program flow. The bits 
or flags are used in conjunction with conditional jump, conditional call, and 
conditional return instructions. We say that a flag is set if it has a value of 1 
or is reset if it has a value of zero. 

The CPU sets the sign flag (S) if the result of a previous operation is 
positive; the flag is reset if the result is negative. The CPU sets a second flag, 
the zero flag (Z), if the result is zero; it is reset if not zero. A third flag, the 
carry flag (C), is set if there is a carry on addition or borrow on subtraction; 
it is reset otherwise. A fourth flag, the parity flag (P), indicates the parity of 
the result. Parity is even if there is an even number of ones (or zeros) and 
odd otherwise. 


's ! Zt ! ! PoP !c ! 


Figure 1.2. The PSW (flag) register. 


The use of the flag register can be demonstrated with a simple routine. 
Suppose that a group of instructions is to be executed eight times. The fol- 
lowing code will do this. 
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MVI B»8 jreut 8 into EB 
LOOF? oe 

o ° e 

DCR B sdecrement B 

JNZ LOOF jloor if mot zero 


The B register is initialized to the value of 8. The DCR B instruction near 
the end of the loop decrements the B register each time the loop is executed. 
This will reset the zero flag on each of the first seven passes through the 
loop since B has not reached zero. The following conditional jump instruc- 
tion, JNZ LOOP, causes the CPU to return to the line labeled LOOP in 
this case. 

On the eighth pass through the loop the original value of 8 in the B 
register will have been decremented to zero. Now the zero flag will be set 
and the conditional jump instruction will not cause a branch. The instruction 
immediately following the jump will be executed instead. 


FLAGS AND ARITHMETIC OPERATIONS 


The results of addition and subtraction operations can be characterized from 
the PSW flags. Three of the flags are of interest here: the carry flag, the zero 
flag, and the sign flag. If the sum of two numbers exceeds 255 (1 less than 2 
to the eighth power), then the result is too large to fit into the 8-bit accumu- 
lator. The carry flag will be set to reflect this overflow. During subtraction, 
the carry flag is set when a larger number is subtracted from a smaller one. 
In this case, the flag becomes an indication that borrowing has taken place. 

Sometimes all eight bits of a register or memory location are used to 
represent a number. This is then an unsigned number. At other times it is 
convenient to utilize only the low-order seven bits (bits 0-6) for the mag- 
nitude of a number. The remaining high-order bit (bit 7) is then used to 
indicate the sign. 


magnitude sign madtnitude 
J eee eee en eee ! all Kesteuentetenhetatetetenheteatanl ! 
! 8 bits ! !ot 7 bits ! 
!tttbtetdbs test tte 
bet—t-b-}-t—b-t—1 f—-l-f}-!-—!-J]-!-t-1} 
76543210 76543210 
unsigned mumber sisgned number 


Numbers represented in this way are known as signed numbers. A 0 in bit 7 
means that the number is positive and a 1 means that the number is negative. 
An 8-bit signed number can range in magnitude from —128 to 127, whereas 
an unsigned 8-bit number can range from 0 to 255. 

The sign flag is set after certain operations if the value of bit 7 is 1 and 
it is reset if bit 7 is 0. If the sum of two numbers is exactly 256, the result in 
the 8-bit accumulator will be a zero. This occurs because 256 is 1 greater 
than the largest 8-bit number (255). The zero flag will be set in this case. 
In addition, the carry flag will be set because there is an overflow. The parity 
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flag will be set, since there is an even number of ones. (Zero is an even num- 
ber.) Finally, the sign flag will be reset because bit 7 is a zero. 


FLAGS AND LOGICAL OPERATIONS 


In the case of arithmetic operations such as addition and subtraction, there 
can be a carry or borrow from one bit to another. But the logical operations 
AND, OR, and XOR (exclusive OR) operate on each bit separately; there is 
never a carry from one bit to the next. These logical operations, therefore, 
always reset the carry flag. The zero and parity flags, however, will be set or 
reset according to the result of the particular operation. We will discuss 
logical operations more fully in Chapter 2. 

A value in the accumulator can be compared to a value in another 
register or to the byte immediately following the instruction byte in mem- 
ory. The CPU performs the comparison by subtracting the value of the 
operand from the value in the accumulator. In the case of a regular subtrac- 
tion, the difference is placed in the accumulator. For example, the arithmetic 
instruction 


SUB c 


subtracts the value in register C from the accumulator and places the differ- 
ence into the accumulator. The logical comparison operation 


CMP Cc 


also subtracts the value in register C from the value in the accumulator. 
However, unlike the regular subtraction operation, the difference in this case 
is not actually saved. The flags, of course, will reflect the result of the opera- 
tion. If the value in C is equal to the value in the accumulator the difference 
between them will be zero. In this case the zero flag is set indicating the 
equality. The carry flag will be reset since there was no borrow during the 
subtraction. 

If the two values are not equal, then A is either larger or smaller. If A 
is larger, the comparison operation will reset the carry flag (and, of course, 
the zero flag). If A is smaller, then the carry flag will be set, because a larger 
number has been subtracted from a smaller one. Thus, if the carry flag has 
been set after a comparison, then the value originally in the accumulator 
must have been smaller than the value with which it was compared. 

The following instructions can be used to determine if the value in 
register C is less than, greater than, or equal to the value in the accumulator. 


CMP Cc 5 subtract A from C 

JZ ZERO ’ if A eauals C 

JC LESS ’ if A less than C 
; 


if A greater than C 


oo ¢ @ 
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The comparison instruction is executed first. This operation subtracts the 
value of C from the value in the accumulator. If the two numbers are equal, 
then their difference is zero. In this case, the zero flag is set and the JZ 
instruction causes a branch to the label ZERO. Otherwise, the next instruc- 
tion is executed. Another possibility is that the value in C is greater than the 
value in the accumulator. The subtraction in this case requires a borrow so 
the carry (borrow) flag is set. The JC instruction then causes a branch to the 
label LESS. The last possibility is that the value in the accumulator is larger 
than that in register C. For this case, both the zero and the carry flags are 
reset, and the program continues. 


INCREMENT, DECREMENT, AND ROTATE INSTRUCTIONS 


The 8-bit increment and decrement instructions present an interesting case. 
Mathematically, the increment operation simply adds 1 to the current value 
in a register. Likewise, the decrement operation subtracts 1 from the present 
value. Thus, the two instructions 


INR A and 
ADI 1 


both increase the value in the accumulator by 1 and the operations 


ICR A and 
SUI 1 


both decrease the value in the accumulator by 1. The zero, parity, and sign 
flags correctly reflect the result in all cases. 

The carry flag, however, responds differently for the two cases. The 
flag correctly reflects the result of the operation in the case of addition, but 
it is unaffected in the case of an increment or decrement operation. Thus, if 
you need to increment or decrement a value without disturbing the carry 
flag, then you should use the INR or DCR instructions. On the other hand, 
if you need to know whether a carry or borrow occurred during an incre- 
ment or decrement, then use an add or subtract operation. 

The instructions following the label GETCH in Listing 6.1 (in Chapter 
6) are used to set ASCII characters from the console input buffer. As each 
character is obtained, the count of the remaining characters is decremented. 
When the count has been decremented past 0, then the routine is finished. 
Subtracting 1 from 0 requires a borrow so the carry flag should be set. But 
since the regular decrement operation doesn’t alter the carry flag, the sub- 
tract instruction must be used instead. 
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ROTATION OF BITS IN THE ACCUMULATOR 


There are four 8080 instructions that rotate the bits in the accumulator. The 
operations move each bit by one position. Two instructions rotate the bits 
to the right and two rotate them to the left. The right circular rotation 


RRC 


moves each bit one position to the right. The rightmost (low-order) bit is 
moved to the high-order bit and into the carry flag. 


ao cece sees seen enee mee caee ceee ee cnee coee weet een of” same sees cate sete ene ston ste cnne sate see cate sate sone came sate ee ceee owen 
|-------. —— < v=! 


! ! 

! eres eres ees ee oe ==! 

ee > > a a a a a ie rd Ee ae 
| --= | === |---| === |---| ===! ---1---! Jn 


accumulator carry 
The left circular rotation 
RLC 


moves the bits the other way. 


| mp omen nnn nn Pree poceees ! 

! ! 
bees ! besHt neslert lone teestenstnse tees! ! 
[css Pemege fe fe fe Me Me Se Ke kero! 
Loe fan sfeeeLese Sates ee lace laoe | 
carry accumulator 


Each bit is moved one position to the left. The high-order bit goes to both 
the low-order bit and to the carry flag. 
The rotate accumulator right instruction 


RAR 


moves each bit one position to the right. But this time, the carry flag moves 
into the high-order bit and the low-order bit moves into the carry flag. 


Pomme Sloane leatantetentaateateenteel KSSH esses ene ees Ca gn! 
t ! 
! tented Keatenteadl Rechetee Renteatenl Retention Rectentealt Renteated Ketel [---! 1 
I-> 1 “> <-> => =F > -P FF SPooe eH >! !-! 

TR cteateall Restenteelt Retin Reteteel Retail tentated etait Retetee [--—1 
accumulstor carry 


The instruction 


RAL 
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moves each bit one position to the left. The carry flag moves into the low- 
order bit and the high-order bit moves into the carry flag. 


! |---|] J—---—}--- | ~~~} ---}--~-~}~--}---{---1] 
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carry accumulator 


FLAGS AND DOUBLE-REGISTER OPERATIONS 


Double-register, or extended, operations involving HL, DE, and BC affect the 
flags very differently from the single-register operations. We saw that single- 
register increment and decrement operations did not alter the carry flag. The 
extended increment and decrement commands never alter any of the flags. 
This means that if a program is to loop until a double register has been 
decremented to zero, the following set of instructions will not work. 


LOOF: o 8 6 


. 2 oJ 
nCXx H 916-bit decrement 
JNZ LOOF if not zero 


The proper procedure is to compare the two 8-bit halves with each other. 
This can be done by moving one of the registers to the accumulator. 


MOV ArL 


Then the accumulator is compared to the other half by performing a logical 
OR. The result of this operation will set the zero flag only if both halves are 
zero. The complete operation looks like this. 


LOOP: ee 6 


oo 6 @ 


DCX H 914-bit decrement 
MOV AsL smove L to A 

ORA H 9OR with H 

JINZ LOOF sif not zero 


The double-register add instruction correctly sets the carry flag if there 
is an overflow from the 16 bits, but zero, parity, and sign flags are not 
altered. 


THE Z-80 CPU 
The Z-80 CPU is a 40-pin IC just like the 8080. All of the 8080 instructions 


are common to the Z-80, thus we say the Z-80 is upward compatible from 
the 8080. In general, any program that runs on an 8080 will also run on a 
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Z-80. The one exception is that the 8080 parity flag is affected by arithmetic 
operations, while the Z-80 parity flag is not. Thus, one can use an 8080 
assembler to generate 8080 code on a Z-80. 

The Z-80 requires only a single 5-volt power supply and a single-phase 
clock that can run as fast as 6 MHz. There are 158 instruction types that 
give a very large number of total commands with all variations. These are 
given briefly in Appendixes E and F and in more detail in Appendix H. The 
Z-80 contains all of the 8080 general-purpose registers, plus an alternate set 
for easy interrupt processing. The alternate set is indicated with a prime 
symbol: A’, B’, and so on. Only one of the two general sets of registers can 
be used at any time, therefore, data cannot be transferred directly from one 
set to the other. There are also two 16-bit index registers called IX and IY, 
an 8-bit interrupt register (I), and an 8-bit refresh register (R). 


Primary resisters Alternate resisters 

8 bits ! PSW’ 
8 bits ! C’ 

8 bits | E’ 


8 bits ! L’ 


i 
I 
i 
i 
1 
! 
H 
i 
i 
| 
i 
! 
1 
! 
i 
1 
i 
i 
} 
i 
i 
i 
i 


] 16 bits ! 


Po! 16 bits ! 


Index | ------------—-—--------- ! 
Resister X ! 14 bits ! 


Index ! 16 bits ! 
Resister Y fenterr Stats seas ereHS ! 


Interrupt Pm eee ae ! 
Register I 1 8 bits ! 


Refresh ! 8 bits ! 
Redister R | ---------— ! 


Figure 1.3. The Z-80 CPU registers. 


An operand for an assembly-language instruction may consist of a value 
that is used directly, or it may refer to a location that contains the value. For 
example, the command 


Lo Ars 


instructs the CPU to place the value of 6 into register A. Similarly, the 
instruction 


LO A»D 
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will move the contents of register D into register A. Alternately, the operand 
may be a pointer to another location. Thus the command 


LD Ar (4) 


will move the byte located at address 6 into the accumulator. Similarly, the 
instruction 


LD Ay (HL) 


tells the CPU to move the byte pointed to by the HL register into the 
accumulator. The Z-80 mnemonics clearly differentiate a pointer by means 
of the parentheses, whereas the corresponding 8080 mnemonics do not make 
such a clear distinction. 


Z-80 RELATIVE JUMPS 


Computer instructions are generally executed in order, one after the other. 
But it is sometimes necessary to branch out of the normal sequence of state- 
ments. Branching statements can be classified as either conditional or uncon- 
ditional. An unconditional or absolute branch always causes the computer 
to execute instructions at a new location, out of the normal flow. Condi- 
tional branching, on the other hand, is based upon the condition of one of 
the flags. 

Programs utilizing the Z-80 instruction set can be significantly shorter 
than those written with 8080 operation codes, especially if the relative jump 
instructions are used. Relative jumps are performed by branching forward or 
backward relative to the present position. Absolute jumps, on the other 
hand, are made to a specific memory location. Furthermore, there are both 
unconditional and conditional branch instructions. The absolute, uncondi- 
tional jump op code and the conditional jump codes based on the state of 
the zero and parity flags are all three-byte instructions. 


IP ADDR1 § unconditional Jume 

JP Zr» ADDR2 + Jump if zero flag set 

JP NZ*,ADDR3 ¢ Jump if zero flags reset 
JP C»ADDR4 § Jume if carry flad set 
JP NCvADDRS ¢ Jump if carry flad reset 


The above instructions are available on both the 8080 and the Z-80 CPUs. 
In addition, the Z-80 has a relative, unconditional jump and five relative, 
conditional jumps. 


JR ADDR § unconditional jump 
JR Z»ADIRG ¢ zero 
JR NZ*»ADDR7 + not zero 
JR Cr»yADDRS ¢ carry 
JR NCvsADDRO ¢ mot carry 
’ 


DJINZ ADDR10 decry Jump not zero 
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The relative jumps are only two bytes long as opposed to three bytes 
for the regular jumps, but the relative jump is limited to a displacement of 
less than 126 bytes forward or 128 bytes backward from the address of the 
current instruction. These numbers derive from the magnitude of the signed 
8-bit displacement. Bit 7 is used for the sign of the number. A 0 in bit posi- 
tion 7 means a forward or positive displacement, a 1 in this bit position 
means a backward or negative displacement. The remaining seven bits are 
used for the magnitude of the jump. 

Absolute jumps are specified with a 16-bit address that gives the new 
location. Relative jumps on the other hand are position-independent. The 
resulting code can be placed anywhere in memory. The last operation above, 
DJNZ, is a combination of two instructions. The B register is decremented. 
If the result is not zero, then there is a relative jump to the given argument 
ADDR10. This two-byte instruction requires four bytes on an 8080 CPU. 


Z-80 DOUBLE-REGISTER OPERATIONS 


While some of the Z-80 instructions appear to be shorter than their 8080 
counterparts, they may not actually reduce the program size. Suppose, for 
example, that we want to move a block of data from one memory location 
to another. There is a single Z-80 instruction for accomplishing this task. 
The problem is that no verification is performed during the move. Thus, if 
there were no memory at the new location, or if the memory were defective, 
this fact would not immediately be discovered. If you want to check each 
location as the data are moved, then the Z-80 block-move instruction cannot 
be used. 

A better way to move data is to define the beginning of the original 
memory block with HL and the end with DE. The BC register defines the 
beginning of the new block. We can work our way through the original block 
by incrementing HL and BC at each step along the way. 

The end of the block can be detected when HL exceeds DE. We sub- 
tract the two 16-bit registers and observe the carry flag. The HL register pair 
will initially be less than the DE pair. Therefore, if we subtract DE from HL, 
we will set the carry (borrow) flag. 

Eventually, the number in the HL register will equal the value in the 
DE pair. This time, the subtraction will not set the carry flag and the task 
will be completed. Since the 8080 doesn’t have a 16-bit subtract instruc- 
tion, the routine might look like this. 


LOOP? o 8 6 8080 version 


> 


¢ GET L 
SUB E + SUBTRACT E 
MOV AsH > GET H 
SBB D § SUBTRACT D AND BORROW 
Jc LOOP § IF NOT DONE 
RET » DONE 
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As long as HL is less than DE, the subtraction will set the carry flag and the 
loop will be repeated. But as soon as HL equals DE, the carry flag will be 
reset and the subroutine is finished. 

The Z-80 has a 16-bit subtract instruction that can simplify the opera- 
tion. But since the result of the subtraction is placed in the HL register pair 
rather than in the accumulator, the data originally present in HL will have to 
be saved somewhere else, say, on the stack. The Z-80 code is: 


LOOP: o 6 6 § Z-80 version 
OR A ¢ RESET CARRY 
PUSH HL ¢ SAVE HL ON STACK 
SBC HL » DE § SUBTRACT DE FROM HL 
POP HL ¢ RESTORE ORIGINAL HL PAIR 
JR CryLOOP »¢ IF NOT DONE 
RET 


The necessary Z-80 instructions require just as many bytes as the corre- 
sponding 8080 code. And if the carry flag on the Z-80 has not been reset by 
a previous instruction, it will have to be reset at the beginning with a logical 
OR instruction. This latter problem occurs because the Z-80 16-bit subtrac- 
tion includes the carry flag in its calculations. 


Z-80 INPUT AND OUTPUT (I/O) INSTRUCTIONS 


A useful pair of Z-80 instructions deals with input and output, i.e., the 
transfer of data between the CPU and peripherals such as the console, the 
printer, and the disk. The 8080 can only input and output data from the 
accumulator, and the address of the peripheral device must immediately 
follow the IN or OUT instruction in memory. 


OUT 10 
IN 11 


This usually means that for read-only memory (ROM), there must be sepa- 
rate input and output routines for each peripheral. 

In contrast, the Z-80 can input or output a byte from any of the 
general-purpose registers when the peripheral address is in the C register. 
In this case, it may be possible to use a single set of I/O routines for all 
peripherals. This approach is discussed more fully in Chapter 4. 


SHIFTING BITS 


The Z-80 CPU extends the four 8080 rotate instructions to the general- 
purpose registers B, C, D, E, H, and L. The memory byte referenced by HL, 
IX, and IY is also included. 

The Z-80 instruction set includes three shift operations. Shifts are 
similar to rotations since each bit moves one position and the bit that is 
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shifted out of the register is moved into the carry flag. The difference is in 
the bit that is shifted into the register. 
The arithmetic shift left 


SLA 


shifts all bits to the left. A zero bit moves into the low-order bit. 


! f.<s=<--= qs £9. 4 °R=° Ke Ke Se ! <-- 0 


carry accumulator 


The operation doubles the original 8-bit value. This operation can be per- 
formed on the accumulator of an 8080 by using an 


ADD A 


instruction. 
A logical shift right 


SRL 


is the inverse of the arithmetic shift left operation. Each bit shifts one posi- 
tion to the right. A zero bit is shifted into the high-order position. 


| -== | awn} n= |---| = $= --- 1 ---! |---! 
Onm-> 1 <> > MR KD KD RP HD RPee eee Eo! 
|---| -= = |---| n= | en = |---| =F -=-! !---! 


accumulator carry 


This operation halves the original 8-bit value. The carry flag is set if the 
original value was odd, thgt is, if there is a remainder from the division. 
The arithmetic shift right 


SRA 


shifts each bit one position to the right, but the original high-order bit is 
unchanged. 


ees ee eee ee ee ee ee 1---! 
ns a a a > a a a ae re >!o} 
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! ! accumulator carry 
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This operation can be used to divide a signed number in half. The high-order 
bit, the sign bit, is unchanged. As with the logical shift right, the carry flag is 
set if the original number was odd. 


CHAPTER TWO 


Number Bases 
and Logical Operations 


In this chapter we will consider how numbers are stored in a computer. We 
will also look at some of the operations that can be performed on these 
numbers. But first we will review the representation of numbers in general. 
When we write a number such as 245, we usually mean the quantity 5 plus 
40 plus 200. 


2 4 5 (decimal) 


| baa 5X 1= 5 
4X 10= 40 (4 X the base) 
2 X 100 = 200 (2 X the base squared) 


245 (decimal) 


This is the ordinary decimal or base-10 representation of a number. The 
rightmost digit gives the number of units. The digit immediately to the left 
is the number of tens (the base). The next digit to the left is the number of 
100s (the base squared). 

In assembly language programs it is sometimes convenient to represent 
numbers with a base of 2, 8, or 16. In the octal, or base-8, system, for exam- 
ple, the number 245 is equivalent to the decimal number 165 (5 plus 32 
plus 128). 


2 4 5 (octal) 


| a 5X 1 5 
4X 8 32 (4 X the base) 
2 X 64 


128 (2 X the base squared) 
165 (decimal) 


16 
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This example demonstrates how to convert numbers from other bases into 
the decimal representation by adding up the decimal equivalent of each digit. 

In the binary, or base-2, system, only the digits 0 and 1 are used. The 
individual digits are called bits, an acronym for binary digits. The rightmost 
bit represents the units. The bit immediately to the left is the number of 2s 
(the base). The next bit to the left is the number of 4s (the base squared). 
We continue in this way through all of the bits. For example, the binary 
number 


10100101 


is equivalent to the decimal number 165. The conversion is obtained in the 
following way. 


10100101 (binary) 


SCOrROF 
x xX KK 
1) 
1 ot 


1 X 128 = 128 
165 (decimal) 


We have seen that the decimal system utilizes ten different digits (0-9). 
The octal system, however, utilizes only eight digits (0-7), and the binary 
system uses only two (0-1). The hexadecimal, or base-16, system is also 
commonly used in computer programs. With this method, we need 16 differ- 
ent digits. The problem is that if we use all of the digits (0-9) from the 
decimal system, we will still be six digits short. The solution is to use the 
letters A through F to represent the digits beyond 9. Thus, the hexadecimal 
number A5 is equivalent to the decimal number 165. We can convert a hexa- 
decimal number into decimal in the usual way if we remember that A stands 
for decimal 10, B for 11, and so on. 


A 5 (hexadecimal) 
ive 5X 1= 5 
10 X 16 = 160 (10 times the base) 
165 (decimal) 


The first 16 integers of the decimal, binary, octal, and hexadecimal systems 
are shown in Table 2.1. 
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Table 2.2. The first 16 integers represented 
in various number systems. 


decimal binary octal hex 
0 0000 000 00 
1 0001 001 01 
2 0010 002 02 
3 0011 003 03 
4 0100 004 04 
5 0101 005 05 
6 0110 006 06 
7 0111 007 07 
8 1000 010 08 
9 1001 011 09 
10 1010 012 OA 
11 1011 013 OB 
12 1100 014 0c 
13 1101 015 0D 
14 1110 016 OE 
15 1111 017 OF 


Table 2.1 shows the common practice of displaying leading zeros on 
numbers expressed in bases other than 10. Thus we write 5 for a decimal 
number, but we may write 005 if it is an octal number or 05 if it is a hexa- 
decimal number. We may explicitly represent the base by a suffix. In books, 
for example, we typically utilize a subscript in smaller size type. Thus we 
will write: 


1010, (binary) 
17, (octal) 
1710 (decimal) 
1716 (hexadecimal) 


Alternately, we use suffixes of B, Q, D, and H to designate, respectively, 
binary, octal, decimal, or hexadecimal mode in computer programs where 
subscripts are not available. 


1010B (binary ) 

17Q (octal) 

17D (decimal) 
17H (hexadecimal) 


(The letter Q is used instead of an O for an octal number to avoid confusion 
with zero.) 
Binary numbers such as 


011001101111 
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can be difficult to read, so it is common practice to represent them in octal 
or hexadecimal form. Conversion to octal is easy if the bits are grouped by 
threes. 


011 O01 101 111 (binary) 
3 1 5 7 (octal) 


Grouping by fours facilitates the conversion to hexadecimal. 


0110 0110 1111 (binary) 
6 6 F (hexadecimal) 


NUMBER REPRESENTATION IN BINARY, BCD, AND ASCII 


All information is ultimately stored in computers as a series of binary digits. 
There are, however, several different coding schemes for representing the 
original data. The simplest method is to use straight binary coding, as shown 
in Table 2.1. Notice that we might choose to represent a binary value in 
decimal, octal, or hexadecimal notation. The number itself is unchanged by 
this. The decimal number 12, for example, is stored as the binary number 
1100. 

A different method of representing data is called binary coded decimal 
(BCD). Actually, there are two types of BCD: unpacked and packed. With 
unpacked BCD, each byte contains a single decimal digit from 0 to 9. Packed 
BCD can have one or two decimal digits in each byte. Thus, a packed BCD 
number can range from 0 to 99. By comparison, an 8-bit binary number can 
range from 0 to 255. Table 2.2 shows the first 16 integers in BCD. The first 
column gives the decimal equivalent, the second column the corresponding 
bit pattern. 


Table 2.2. The first 16 integers represented in 
decimal and binary-coded decimal (BCD). 


decimal BCD 


OMOANIDOTRWNH O 
oO 
So 
So 
Oo 
i) 
pare 
oO 
pare 
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Notice that the binary representation for the decimal numbers 0 through 9 
is the same for both binary and for BCD. 

A third method for encoding data is called ASCII. This scheme is com- 
monly used with peripherals such as printers and video terminals. When the 
key labeled 2 of an ASCII console is pressed, the bit pattern 


0011 0010 


is generated. Table 2.3 gives the bit patterns for the ASCII digits 0-9 in 
binary and hexadecimal notation. 


Table 2.3. The bit pattern for the ASCII digits 0-9. 


digit binary hexadecimal 
0 0011 0000 30 
1 0011 0001 31 
2 0011 0010 32 
3 0011 0011 33 
4 0011 0100 34 
5 0011 0101 35 
6 0011 0110 36 
7 0011 0111 37 
8 0011 1000 38 
9 0011 1001 39 
LOGICAL OPERATIONS 


The fundamental operations of a computer involve electrical signals that can 
have only one of two values. The two voltage levels might be zero and 5 
volts, for example, or they might be something else. The actual value is 
unimportant at this point. Instead, we refer to the two allowable states as 
TRUE and FALSE. The TRUE state is also called a logical 1, or high state, 
and the FALSE state is also known as a logical 0, or low state. 


TRUE =1 (high) 
FALSE =0 (low) 


Computers store numbers in binary form as a series of 1s and Os. These two 
possible values correspond to the two possible voltage levels of the electronic 
circuitry. We can therefore utilize the expressions TRUE and FALSE to 
describe the state of each bit. 

The collection of transistors, resistors, and so forth that makes up the 
physical computer is called the hardware. The computer program used to 
direct the activities of the computer is termed the software. In this sense, the 
hardware and software are distinctly different. But sometimes we use these 
terms a little differently. 
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Consider, for example, one of the major differences between minicom- 
puters and microcomputers. Minicomputers contain electronic circuitry for 
the multiplication of two numbers. Since microcomputers do not contain 
such circuitry, multiplication is performed instead by executing a special 
computer program. We say that minicomputers perform multiplication by 
hardware, but that microcomputers must do multiplication by software. 

Hardware operations are performed by electronic devices called gates. 
The internal structure of the gate is unimportant if we are only interested in 
the logic of its operation. There are input signal lines that are sampled by the 
gate, and there is an output signal that is generated by the gate. When we 
consider the logical operations that are performed by a computer, we can 
imagine that they are accomplished either by hardware or by software. The 
answer is the same. 

A common logical operation is the complement or inversion of a binary 
digit. The complement of 0 is 1 and the complement of 1 is 0. The hardware 
complement is performed with an inverter or NOT gate. The electronic 
symbol for this gate, shown in Figure 2.1, is a triangle with one apex to the 
right (usually) or to the left (sometimes). A small circle or triangle at this 
apex completes the symbol. 


a 
Figure 2.1. The electronic symbol for the NOT or inverter gate. 


Letters of the alphabet are used to designate input or output signals. 
These binary signals can have one of two states, termed TRUE (1) or FALSE 
(0). The letter A with a bar over it (A) represents the complement of A and 
is called NOT A. A truth table is used to summarize the possible states. 


A A or A A 
0 1 FALSE TRUE 
1 0 TRUE FALSE 


THE TWO’S COMPLEMENT 


If each bit of an 8-bit byte is complemented, we produce a result that is 
termed the one’s complement of the byte. 


0000 1001 9 
1111 0110 = one’s complement of 9 


Both the 8080 and the Z-80 CPUs provide an operation code for comple- 
menting the accumulator. A slightly different operation is the two’s com- 
plement. It is obtained by incrementing (adding 1 to) the one’s complement 
of a number. For example: 
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0000 1001 = 9 


1111 0110 one’s complement of 9 
+ 0000 0001 add one 


1111 0111 = two’s complement of 9 


It is interesting to note that the sum of a number and its two’s comple- 
ment is zero. 


1010 1010 = 170 


0101 0101 = one’s complement of 170 
+ 0000 0001 add one 


0101 0110 = two’s complement of 170 


0101 0110 = two’s complement of 170 
+1010 1010 = 170 


0000 0000 sum 


Adding the two’s complement of a number produces the same result as 
subtracting the number itself. For example, we can subtract 170 from 223 
by adding the two’s complement of 170. The result is the same. 


1101 1111 = 223 
— 1010 1010 = 170 


0011 0101 = 53 


or 


1101 1111 = 223 
+ 0101 0110 = 2’s complement of 170 


0011 0101 = 53 


The 8080 CPU can perform both addition and subtraction with 8-bit 
numbers and it can add 16-bit numbers, but there is no 16-bit subtraction 
operation. We can effectively perform a 16-bit subtraction, however, by 
adding the two’s complement. Suppose that the HL register pair contains 
the decimal value 10,005 and we want to subtract 10,000 from it. The dif- 
ference between 10,005 and 10,000 can be obtained by adding the two’s 
complement. Consider the bit pattern for the number 10,000. 


0010 0111 0001 0000 = 10,000 
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We first form the one’s complement, then increment the result to form the 
two’s complement. 


1101 1000 1110 1111 = one’s complement of 10,000 
+ 0000 0000 0000 0001 add one 


1101 1000 1111 0000 = two’s complement of 10,000 
Finally, we add this two’s complement to the value in HL. 


0010 0111 0001 0101 = 10,005 in HL 
+ 1101 1000 1111 0000 = two’s complement of 10,000 


0000 0000 0000 0101 difference (sum) is 5 


When an assembler encounters a negative argument, it will automati- 
cally calculate the corresponding two’s complement. Thus the 8080 ex- 
pression 


LXI = Dyv-10000 
will place the bit pattern 
1101 1000 1111 0000 
in the DE register pair. The instruction 


DAD f) 


will then effectively perform a 16-bit subtraction on the number in HL. 


LOGICAL OR AND LOGICAL AND 


In the previous section, we considered the logical operation of NOT. Two 
other important logical operations are OR and AND. Both of these opera- 
tions reflect the usual English meaning. The logical OR of two bits results in 
a value of TRUE (1) if either or both the original values are TRUE. The 
result is FALSE otherwise. The logical AND of two values gives an answer 
of TRUE (1) if and only if both of the original values are TRUE. If either or 
both the original values are FALSE, then the answer is FALSE. 

Equations of logical operations can be written using the appropriate 
symbols. Two OR operators are in common use: a plus symbol and a V- 
shaped symbol. The AND operator is either a dot or an inverted V. The 
schematic representations of the OR and AND gates are shown with their 
corresponding mathematical representations in Figure 2.2. 
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B B 


Figure 2.2. The OR and the AND gates. 


The truth table is 


(OR) (AND) 
A B A+B A:B 
0 0 0 0 

0 1 1 0 

1 0 1 0 

1 1 1 1 


where zero means FALSE and 1 means TRUE. The origin of the + symbol 
for the OR operation and * symbol for the AND operation can be seen from 
the truth table. Logical operations are performed separately on each bit, and 
there is never a carry. The logical OR (sum) of A and B gives zero if both 
bits are zero, but 1 otherwise. (Binary digits can’t be larger than 1.) The 
logical AND (product) of A and B gives zero if either or both bits are zero 
and unity otherwise. 


SETTING A BIT WITH LOGICAL OR 


Sometimes, we need to set one or more bits of the accumulator. We can use 
the logical OR operation for this purpose. From the truth table in the pre- 
vious section, we can see that a logical OR of 1 with either a 0 ora 1 will 
give a result of 1. 


A B A+B 
1 0 1 
1 1 1 


Thus, a logical OR of any bit with a 1 will set that bit. On the other hand, a 
logical OR of O and another bit gives the result of that other bit. 


A B A+B 
0 0 0 
0 1 1 


In this case, the second bit is not changed. 
Suppose that the accumulator contains a binary 5 and we want to con- 
vert it to an ASCII 5. 


0000 0101 
0011 0101 


binary 5 
ASCII 5 
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If we compare the two bit patterns, we can see that they are the same except 
for bits 4 and 5. These bits can be set by executing a logical OR with an 
ASCII zero. 


0000 0101 
OR 0011 0000 


binary 5 
ASCII zero 


il 


0011 0101 = ASCII5 


The OR operation has set the bit corresponding to the location of the 1, but 
it has left the other bits unchanged. 
A logical OR of a register with itself does not change the value. 


0101 1010 = 5A hex 
OR 0101 1010 5A hex 


0101 1010 = 5A hex 
But this operation can be used to set the flags. In this example, the zero, 
carry, and sign flags are reset and the parity flag is set. 
RESETTING A BIT WITH LOGICAL AND 
A logical AND operation can be used to reset any particular bit of the 


accumulator; the truth table shows how. A logical AND of 0 and either a 0 
or al will always give a result of 0. 
A B A‘B 
0 0 0 
0 1 0 


Thus, the bit is reset. On the other hand, a logical AND of 1 and another bit 
will give the value of the other bit. 


A B A‘B 
1 0 0 
uf 1 1 


Thus the AND instruction can be used to reset or “‘turn off’’ particular bits. 
This step is sometimes called a masking AND operation. 

When the CPU reads an ASCII character from the console, it gets an 
8-bit byte. But since the ASCII code contains only 7 bits, the high-order bit 
is not needed. The console-input routine typically resets this bit by per- 
forming a masking AND operation. Suppose that the console transmitted an 
ASCII 5 with the high-order bit set. The bit pattern looks like this. 


1011 0101 
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The high-order bit can be reset with an AND operation. 


1011 0101 (original byte) 
AND 0111 1111 (mask) 


0011 0101 (ASCII 5) 


LOGICAL EXCLUSIVE OR 


The ordinary OR operation is sometimes called an inclusive-or operation to 
distinguish it from the exclusive OR (XOR) operation. For this latter opera- 
tion, the result is TRUE only if the corresponding bits of both values are 
different. Either A or B must be TRUE, but not both. The XOR operation 
is represented by a plus symbol surrounded by a circle. The complement of 
the XOR is the exclusive NOR or XNOR. It can be used as a comparator. 
The hardware implementation is sometimes used in circuitry to enable 
memory boards. The result is TRUE if and only if both corresponding bits 
are identical. The result is FALSE otherwise. The truth table is: 


A B A@B A®B 
0 0 0 1 
0 1 1 0 
1 0 1 0 
1 1 0 1 


The exclusive OR of a bit with itself will always be FALSE. Therefore the 
XOR of the accumulator with itself will set it to zero. 


0111 1100 7C hex 
XOR 0111 1100 = 7C hex 


0000 0000 = zero 


The corresponding electronic symbols for the hardware implementation of 
the XOR and XNOR are shown in Figure 2.3. 


ee 
B B 


Figure 2.3. The exclusive or (XOR) and comparator (XNOR) gates. 


LOGICAL NAND AND NOR GATES 


By combining an inverter gate in series with the AND and OR gates, anew 
set of gates is formed. The NOT AND gate is called a NAND gate; it is shown 
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in Figure 2.4. The NOT OR gate is known as a NOR gate; it is shown in 
Figure 2.5. 


A A aeee 
X=A-B X=A°B 
B B 


Figure 2.4. The NAND gate can be produced from an AND gate and a NOT gate. 


A 
ST) exe —) De x-38 
B B 


Figure 2.5. The NOR gate can be formed from the OR gate and the NOT gate. 


From the truth table, it can be seen that the outputs of the NOR and NAND 
gates are the inverse of the corresponding OR and AND gates. 


A B A+B A-B 
0 0 1 1 
0 1 0 1 
1 0 0 1 
1 1 0 0 


If both inputs of the NOR gate are connected together, then the gate 
behaves like a NOT gate. The same is true for the NAND gate. This can be 
seen by comparing the first and last rows of the truth tables. In this way, 
two NOR gates can be combined serially to produce an OR gate. The result 
is a NOT NOT OR gate that is equivalent to an OR gate. This is shown in 
Figure 2.6. In a similar way, two NAND gates can be used to make an AND 
gate as shown in Figure 2.7. Since OR and AND gates cannot be similarly 
combined to produce the NOR and NAND gates, we will find that NAND 
and NOR gates are more common. 


A AFB 


Figure 2.7. Two NAND gates are combined to produce an AND gate. 
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MAKING OTHER GATES 


NOR and NAND gates are very versatile. NOR gates or NAND gates can be 
combined to produce all of the other gates. This can be seen from the fol- 
lowing truth table. 


A B AB AtB’ A:B- A+B A:B. A+B” A:B 
0 0 1 1 0 0 1 1 1 1 
0 1 1 £40 1 0 1 0 0 1 
1 0 0 1 1 0 1 0 0 1 
1 1 #O O 1 1 0 0 0 0 


Notice that column 7 of the truth table has the same values as the last 
column. Similarly, columns 8 and 9 are identical. These relations follow 
De Morgan’s theorem, which can be expressed mathematically as: 


=A*+B_ and 


Figure 2.9. A NOR gate is obtained from four NAND gates. 


The use of a small circle to represent inverted output brings up another 
approach to the understanding of digital logic gates. In the more commonly 
used system, the small circles are used only on the output side of the gate. 

Another approach, however, is to always connect active-high outputs 
to active-high inputs, and active-low outputs to active-low inputs. For this 
latter system, NAND gates will sometimes appear as OR gates with inverted 
inputs, and NOR gates will sometimes appear as AND gates with inverted 
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inputs. According to De Morgan’s theorem, the NAND gate is equivalent to 
the OR gate with inverted input signals. This is demonstrated in Figure 2.10. 
The circuit shown is logically the same as the one shown in Figure 2.9. 
Notice that the active-low outputs of the first NAND gates are connected to 
the active-low inputs of the next OR gate. That is, there are small circles on 
the outputs of the first gates and on the inputs of the second gate. 


Figure 2.10. A NOR gate is produced from four NAND gates. The middle NAND 
gate is shown in its alternate representation. 


CHAPTER THREE 


The Stack 


When main memory is used to store a collection of data, each member of 
the data set is individually accessible. This type of storage is termed random 
access memory (RAM). Magnetic tape storage, by contrast, is serial or 
sequential access memory. In this latter case, only one item of the set is 
available at any one time. There are two ways of storing and retrieving the 
items in a serial memory buffer: one is by means of a first-in, first-out 
(FIFO) buffer, and the other is by means of a last-in, first-out (LIFO) buf- 
fer. We can visualize the serial buffer as a long string of information. With 
the FIFO buffer, items are added at one end and removed from the other. 
This buffer is analogous to an escalator: the people who ride the escalator 
are like the data—those who get on first, get off first. 


Figure 3.1. The first-in, first-out (FIFO) buffer. 


With the LIFO buffer, on the other hand, the data are added and 
removed at the same place. This arrangement is analogous to a very long, 
narrow elevator. Those who get on first, have to wait until everyone else is 
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off before they can get off. It can be seen that magnetic tape is a FIFO 
medium. 


Figure 3.2. The last-in, first-out (LIFO) buffer. 


Sometimes, a special area of main memory is designated as a LIFO 
buffer even though each member of the buffer is individually accessible. 
This region is known as a stack. As an example, Hewlett-Packard calculators 
utilize a very short LIFO stack, consisting of registers known by the letters 
Y, Z, and T. An item in any of the registers is individually accessible, yet the 
stack as a whole can be manipulated. As data is entered from the keyboard, 
it is placed into the X register. This information can then be transferred to 
the stack (register Y in this case) by pressing the ENTER key. We say that 
the contents of the X register are pushed onto the stack. Items can be 
retrieved from the stack and placed in the X register with the roll-down (R) 
key. We say that data are popped from the stack into the X register by this 
means. Another stack operation is performed by the EXCHANGE key which 
is used to swap the contents of the X and Y registers. 


STORING DATA ON THE STACK 


We have seen in the previous chapters that the 8080 and Z-80 microprocessors 
incorporate general-purpose registers for the storage of information. But 
these registers are limited in number. Consequently, a special area of main 
memory is designated for the additional storage of information. This area, 
called the stack, is implemented on the Z-80 and 8080 as a last-in, first-out 
serial buffer even though each item in the stack is individually accessible. 
One of the CPU registers, the stack pointer, references the current location 
in memory. This is the address of the most recently added item. The stack 
pointer is decremented as items are added and incremented as items are re- 
moved. The programmer may place the stack anywhere in memory by load- 
ing the stack pointer with the desired address. For example, the instruction 


Lo SP » 4000H (Z-80) or 
LXI SP »4000H (8080) 


initializes the stack to location 4000 hex. 
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Data can be placed on the stack with one of the PUSH operations. A 
command of 


(Z-80) (8080) 
PUSH HL PUSH H 


will move a copy of HL to the stack. Since main memory is addressed eight 
bits at a time, the PUSH operation is actually performed in two stages. The 
stack pointer is decremented, then the H register (the high half) is copied to 
the stack. The stack pointer is decremented a second time and the L register 
(the low half) is copied to the stack. The stack pointer register now contains 
the address of the low byte. Figure 3.3 demonstrates the action of aPUSH HL 
command. The region of memory devoted to the stack is shown with higher 
memory upward. The arrow represents the stack pointer. 


Address 
SP fer----- ! f------= ! | eotetetenteteaten ! 
mms ' ! ! ' ! ! 4000 
Jorn --- ! GP feern--- !  ceateteateatenteaten ! 
! ! ===> ! high ! ! high ! 3FFF 
pownn--— !  Ceteteateteteaten ! SP Jo------ ! 
! H ! |! =me> | low ! 3FFE 
! 


Figure 3.3. The HL register is pushed onto the stack. 


The POP instruction reverses the PUSH process. For example, a POP DE 
command copies 16 bits from the stack into the DE register. Because the 
stack operates in a LIFQ manner, the most recently added byte is removed 
first. This is placed into register E (the low half of the DE pair). The stack 
pointer is automatically incremented and the next byte is transferred from 
memory to register D (the high half). The stack pointer is then incremented 
a second time. Figure 3.4 demonstrates the operation. Notice that the data 
originally pushed onto the stack is still present. 


Address 
)------- ! 
! ! 4000 
|------- ! 
! high |! SFFF 
SP |------- ! 
smz> ! low ! SFFE 


Figure 3.4. Two bytes are popped from the stack into DE. 
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It can be seen that the stack grows downward in memory as data are 
pushed into it, and it moves back up as data are popped off. For this reason, 
it is common practice to initialize the stack pointer to the top of usable 
memory. Actually, the stack pointer can start at one address above the top 
of memory since the stack pointer is always decremented before use. 

If the general-purpose registers contain important information but they 
are needed for a calculation, it will be necessary to save the original data. 
This can be easily done by pushing the contents onto the stack. The registers 
are restored at the end of the calculation with the three corresponding POP 
commands. The operation goes like this. 


PUSH HL. ssave HL 

PUSH DE ssave DE 

PUSH BC ssave BC 

oe sdo the calculation 
POP BC srestore BC 

POP DE srestore DE 

POP HL. srestore HL 


Notice that the order of the POP commands is reversed from that of the 
PUSH sequence. This is necessary because of the stack’s LIFO operation. 


STACK 

!--—--—~———— ! 1-----—--- ! | eotetieieeteetetententend ! 
! H ! ! H ! ! H ! 
a |--------— ! a ! 
a> ' L ! ! i. ] ! L ' 
|~-------- | -----=--- ! | ------ === 
! D ! ! D ! 
SP [--------—— ! Dw a ce so oe soe oe ! 
asaay> | E ! ! E ! 
|-------~— ! Vm a ee ! 
! B 
SP |--------- ! 
ses? | c ' 
|-------=- ! 

PUSH H PUSH D PUSH B 


Figure 3.5. The contents of the general-purpose registers are saved on the stack. 
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STACK 
!-~--~-—--—- ! }----—---———- ! SP }------—-— i 
’ ! ! ' sen> | ! 
1+--——~—--—~—--—-— ! {------—--—- ! | etenlentententonteetetend ! 
! H ! ! H ! ! H ! 
|--------— ' SF |-—-——----—— ! f----— ! 
' L !ose=> | L ! ' L ! 
!----—-—--—-— ! {--—-—-—-—-—— ! be 1 
! u ' ' D ' ' D ! 
SP !---------— 4 )-—--—-—-—-—-—— ! | me ! 
ss=> | E i i E ! ! E ! 
J ~----=—+- ! fo 5-+ ! !--------~ ! 
' B ! ! B ' ! BR ! 
| mmm ee ee ! | ---—-———— ! Pm ee ! 
' c ! ! £ ! ! Cc ! 
!-—-~-——--—~—~— H !-~--—---—--- ! 1 1 
POP B POP D POP H 


Figure 3.6. The original contents of the general-purpose registers are restored 
from the stack. 


THE ACCUMULATOR AND PSW AS A DOUBLE REGISTER 


The 8-bit accumulator and the 8-bit flag register are treated as a 16-bit 
double register for the PUSH AF and POP AF instructions. In this case, the 
accumulator is treated like the high byte since it is pushed onto the stack 
first. The flag register is pushed onto the stack second. Figure 3.7 demon- 
strates this. 


stack stack 

SP Jenn ! {-------— ! 
san> | ! ' 1 
 tetetetetote ! [------- ! 

! ! ! ry !<-! 

J --- ee $ GP fennn--- ! ! 

! ! ===> ! flags ! ! 

Ym me me me ! EP ai Reteteteteteate ! ! 

! ! 

' Yen me ee me ! ! 

! ! A ! >-! 
! !------- ! 
!-< ! flags ! 
 Rsteateateatonteaton ! 

PUSH PSW FOP PSW 


Figure 3.7. Contents of the accumulator and flag registers are pushed onto the stack. 
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Data can be moved from one register pair to another by using a 
PUSH/POP combination. For example, the two 8080 commands 


FUSH H 
FOP +1) 


will move H to D and L to E. This is not the most efficient way to accom- 
plish the move, however. The sequence requires access to main memory and 
so is slower than the direct register moves 


MOV) DrH 
MOV) EvrL 


Z-80 INDEX REGISTERS 


The Z-80 has two, 16-bit index registers that can participate in the PUSH 
and POP operations. However, the instructions each require two bytes com- 
pared to the other PUSH and POP instructions which only require one byte 
each. As a result, the execution time is slower than the other PUSH and 
POP instructions. There are no official instructions for moving data between 
the index registers and the general-purpose registers. This transfer can be 
performed, however, by use of the PUSH and POP commands. The two 
instructions 


PUSH 1X 
FOF BC 


will copy the IX register into the BC register. 


SUBROUTINE CALLS 


We have seen that the PUSH instructions can be used by the programmer to 
store data on the stack. The 8080 and Z-80 CPUs use the stack for a second 
purpose: storing the return address when a subroutine is called. Subroutines 
are used to efficiently code a set of instructions needed at several different 
places in a computer program. A subroutine is called by using the assembly- 
language mnemonic CALL. At the end of the subroutine, indicated by the 
return statement, control is automatically returned to the calling program. 


! calling.) cnsesas= > ! subroutine ! 
! program | t-------- J ana ae em | 


The input and output routines which control the console may be 
needed at several locations in a program. Consequently, they are coded as 
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subroutines. The 8080 assembly language subroutine for the console might 
look like this. 


OUTPUT? IN STATUS ¥# CHECK STATUS 
ANI INMSK ¥ INFUT MASK 
JZ OUTPUT ¥* NOT READY 
MOV ArB + GET DATA 
OUT DATA 5 SENT DATA 
RET ¢ DONE 


Data can be output from anywhere in a program by placing the byte in the 
B register and calling the output subroutine. The following examples of 
8080 assembly language mnemonics show how a question mark and a colon 
can be printed by calling the console output routine. 


WHAT? MVI By’?’ sOUTPUT A ? 
CALL OUTFUT 


° . ° 


o 


COLON: MVI By’3’ sOUTPUT A COLON 
CALL OUTPUT 


o 8 6 


The above examples utilize the unconditional subroutine call and 
unconditional return instructions. Conditional call and return instructions 
are also available. These commands perform the appropriate call or return 
only if the referenced PSW flag is in the desired state. The four flags—zero, 
sign, carry, and parity —give rise to eight conditions. 


zero 
not zero 
plus 

minus 
carry 

not carry 
parity even 
parity odd 


These instructions are discussed in more detail in Appendix H. 

The stack provides the mechanism for subroutine operation. When a 
CALL instruction is encountered, the address immediately following the 
CALL statement is automatically pushed onto the stack. The subroutine 
address is then loaded into the program counter register. The program 
counter tells the CPU which instruction to execute next. Since a subroutine 
CALL uses the stack, the programmer must be sure that the stack is properly 
defined prior to a subroutine CALL. When a return instruction is subse- 
quently encountered, the return address is popped off the stack and placed 
into the program counter. After return from a subroutine, program execu- 
tion continues with the instruction following the CALL statement. 
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PASSING DATA IMPROPERLY TO A SUBROUTINE 


Since the stack can be used for storing both data and subroutine return 
addresses, the programmer must ensure that there are no conflicts. First, 
there should normally be as many POP instructions as PUSH instructions. 
Second, one must be careful not to PUSH data onto the stack, CALL a sub- 
routine, then POP data off the stack. The LIFO nature of the stack will 
cause trouble in this case. 


PUSH H 
CALL ORDER >---! 
¢ ° ° ! 


o ¢ ¢ ! 


ORDERS « « + g---! 


POP H 
RET po---> P77? CRASH ! 


Figure 3.8 shows an example of improper mixing of data and the returm 
address on the stack. Higher memory is upward and lower memory is down- 
ward. The arrow indicates the current stack pointer position. 


STACK 

SP i loateetetatentententeal ! Jenne § GP leew nn--- ! 
se=> ! data ! ! data ! ===> ! data ! 
[=-=+S-—<+ 1 SP Jernn----- !  Ettetteteatentetel ! 

===> ! address ! 

 Rosleateatentententententon ! 
! Ye cat ee ome ! 
!---> Heyl ! address ! 
finsemmence ! 

PUSH H CALL ORDER POP H RET 


Figure 3.8. Improper mixing of data and the return address on the stack. 


In this example, the data is first pushed onto the stack while in the main 
program. The return address is then pushed onto the stack next, when the 
CALL instruction is encountered. The POP instruction in the subroutine will 
actually load the HL register pair with the subroutine return address rather 
than the data that was expected. This occurs because the data was pushed 
onto the stack before the return address. Worse yet, the RET instruction will 
load the program counter with the data, rather than with a useful address. 
Strange things are likely to happen when the CPU attempts to execute 
instructions at an address defined by the data. 


PASSING DATA PROPERLY TO A SUBROUTINE | 


This section demonstrates a proper way to pass data into a subroutine by 
using the stack. The task can be accomplished with the 8080 XTHL instruction 


38 8080/Z-80 ASSEMBLY LANGUAGE 


or the Z-80 EX (SP),HL instruction. This operation exchanges the HL 
register pair with the two bytes at the current stack position. The instruction 
is analogous to the X/Y EXCHANGE key on an HP calculator. 

The method works in the following way. The data is pushed onto the 
stack while control is in the calling program. When the subroutine is called, 
the return address is pushed onto the stack, just after the data. A POP 
instruction, executed in the subroutine, delivers the return address to the HL 
register. Now, the XTHL instruction exchanges the HL register with the 
stack. The desired data is now in HL and the return address is on the stack. 
Finally, a return instruction will correctly return control to the calling 
program. 


PUSH H § main Frogram 
CALL ORDER § call subroutine 


o ¢ © 


ORDER? oo 6 9 start of subroutine 
POF H > det return address 
3 


XTHL exchanse with data 
e ° ° 
RET § return to main Program 
STACK !--------- $ SP teen------ 1 SP lew------- ! 
! data ! ===> ! data ! ===> ! address ! 


GP | o~_--=-+- ais eee [ ann ne ! 
==> ! address ! 


HL ! address ! data ' 


CALL POP H XTHL RET 


Figure 3.9. Proper mixing of data and return address on the stack. 


It is important to note that the XTHL command only works with the 
HL register. There is no equivalent instruction for the DE or BC registers. 
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A variation of the XTHL technique is also possible. Data can be pushed onto 
the stack from within a subroutine, then retrieved after returning to the 


calling program. 


CALL 
POP 


oo 6 


FETCHS « «+ « 


HL ! 


CALL 


PUSH H 


FETCH 


H sGET THE DATA 


HyDATA #PUT IN Hel 
sSWITCH STACK 
H sRET ADDR 


RET 


Figure 3.10. Using the stack to pass data back from a subroutine. 
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An extension of the XTHL technique allows additional data to be 
passed on the stack. 


CALL FETCH 


POP B sDATA 3 
POP D #DATA 2 
POP H sDATA 1 


FETCH3 « + « 
LHLD DATAL sDATA1 TO Heol 


XTHL sSWITCH STACK 

XCHG sSTACK TO DE 

LHLD DATA2 sGET DATA2 

PUSH H sPUT ON STACK 

LHLD DATAS sGET DATAS 

PUSH H sPUT ON STACK 

PUSH D sRET ADDR TO STACK 
RET 


In this example, the return address is first moved to the HL pair with the 
XTHL command. Then it is moved to the DE register pair with the XCHG 
instruction. Three sets of 16-bit data are obtained from the memory ad- 
dresses pointed to by the arguments of the LHLD instructions DATA1, 
DATA2, and DATAS3. The first set is placed on the stack with the XTHL 
command. Then the other two are pushed onto the stack. Next, the return 
address, previously saved in the DE register pair, is pushed onto the stack. A 
final RET instruction pops the return address from the stack into the pro- 
gram counter. 


SETTING UP A NEW STACK 


Sometimes it is desirable to save the current stack pointer and set up a new 
one. When this happens, the original stack pointer is restored at the conclu- 
sion of the task. The technique is particularly useful when one independent 
program is executed by another. The original stack pointer is saved in a 
memory location, then retrieved at the end of the program. 

If the current program was reached through a subroutine call, the 
return address for the calling program should be the current address on the 
original stack. It is this address that must be saved. 

There is a Z-80 instruction that allows the old stack pointer to be 
stored directly in main memory. The instruction looks like this. 


§ Z-80 VERSION 
; 


START? LOD (OLDSTK)*sSP ssave stack 
LO SP*STACK Snew stack 
LD SP*s(OLDSTK) ¢aet old stack 


RET sdone 
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At the conclusion of the task, the old stack pointer is restored. With an 
8080 CPU, the job is more complicated since the stack pointer cannot be 
directly saved. In this case, the stack pointer is moved to the HL register 
pair which is in turn saved in memory. This is done by first zeroing HL, then 
adding in the stack pointer. At the end of the routine, the old stack pointer 
is loaded into the HL register pair then copied into the stack pointer register. 
Finally, a RET instruction is given. 


START? LXI HrO szero HL 
DAL SP sSP to HL 
SHLD OLDSTK ssave stack. 
LXI SP»STACK #new stack 


LHLD OLDSTK det old stack 
SPHL syrestore stack 
RET 


CALLING A SUBROUTINE IN ANOTHER PROGRAM 


A program may need to call a subroutine that resides in another program. 
But if the second program is revised, the subroutine address in the second 
program will change. This means that the argument of the CALL statement 
in the first program will also have to be changed. 

There are two ways to solve this problem. One method is to provide a 
jump instruction near the beginning of the second program. The address of 
the jump instruction will always be the same. However, its argument, the 
internal subroutine address, can change from one version to the next. The 
first program simply calls CHEK2, and CHEK2 causes a jump to CHEK, the 
desired subroutine. The RET instruction at the end of CHEK will effect a 
proper return to program 1. 


Program 1 


° ¢ ° y 

Fe me coe me me om CALL CHEK2 ¢ call Program 2 
! ° 7 ° < Sear a Vee Shey SAD RE EE ee ! 
! © 6 ! 
! START? JMF CONTIN sstart of Program 2 ! 
'-> CHEK2: JMP CHEK eee eee eee ! ! 
o ° ! ! 
: oo. ! ! 
CHEK? o 8 6 | i lalenlaateatententand ! ! 
RET sto Frodram 1 >-----~-- ! 


Of course, the second program may need to save the incoming stack, then 
restore it before returning to program 1. 

A second solution is to place just the two-byte address of the subrou- 
tine near the beginning of the second program. 


START: JMP CONTIN ¢ Program 2 
CHEK2: Dw CHEK 
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Now the calling program must put its own return address on the stack and 
get the address of CHEK into the program counter. The following example is 
a way to do this. Notice that program 1 does not enter program 2 with a 
CALL instruction. It uses instead the PCHL instruction which copies the 
contents of HL into the program counter. 


FUSH H sSAVE Hol 

LXI HyNEXT ¢RET ADDR 

PUSH H sONTO STACK 

LHLD CHEK2 

PCHL sINTO PC 
NEXT: POP H sORIG Herk 


CALLING ONE SUBROUTINE FROM ANOTHER 


A subroutine called by a main program may in turn call another subroutine. 
When the first subroutine, SUB1, is called, the return address to the main 
program, MAINA, is pushed onto the stack. When the second subroutine, 
SUB2, is called, the return address SUB1A is next pushed onto the stack. 
After the second subroutine has been called, there will be two return ad- 
dresses on the stack: one to get back to SUB1 from SUB2, and the other to 
get back to the main program from SUB1. 


CALL SUB1 +MAIN 
MAINA? 6 6 ened 


SUBROUTINE 1 ! 
! 
! 
! 

! 
RET Dal 


SUBROUTINE 2 


UB2:  . 
RET peecene- 
STACK 
SP !--------- ! |--------- ! SP t--------- ! 
===> ! MAINA ! ! MAINA ! ===> ! MAINA! 
| -----+--~-- ! Sp t--------- ! ! 
===> ! SUBIA ! 
| -------~- ! 
CALL SUB1 CALL SUB2 RET RET 


Figure 3.11. One subroutine calls another. 
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BYPASSING A SUBROUTINE ON RETURN 


It may be that an operation in the sectond subroutine SUB2 makes it desir- 
able to return directly to the main program from SUB2, bypassing SUB1. 
This is easily accomplished if the stack pointer is raised by two bytes before 
executing the return instruction. Of course, care should be taken to see if 
data has been pushed onto the stack after one or both return addresses were 
placed on the stack. The one-byte instruction to increment the stack pointer 
(INX SP) can be executed twice, to raise the stack pointer two bytes. Alter- 
nately, a one-byte POP command can be used if there is a free register pair 
available. 


STACK 
|---~----- ! SP |--------- ! 
1 MAINZ ! ===> | MAIN2 |! 
SP |}--------- ! | ~-------- ! 
===> ! SUBIA ! 
--------- ! 
CALL SUB2 POP H RET 


Figure 3.12. Skipping one level of subroutine during the return. 


Suppose that an ordinary return from subroutine SUB2 back to sub- 
routine SUB1 is desired if the zero flag is set to 1. On the other hand, an 
unusual return directly back to the main program is desired if the zero flag 
is reset to a value of zero. Here is a way to do this. 


CALL SUB1 §MAIN 
MAINI? ¢ 6 @ re | 


§ SUBROUTINE 1 
; 


SUB13 + 6 6 sSUBROUTINE 1 
CALL SUB2 teen 

SUBIAt . « + ! 
RET 


on 
c 
ow 
2 
So 
i 
= 
fo 
=z 
m 
nS 


° ° ° ! 

RZ sNORMAL RETURN >- 
POP PSW sRAISE STACK 

RET sSKIP TO MAIN >--~--~- ! 


The POP PSW instruction raises the stack two bytes so that the final 
RET instruction delivers the return address of MAINI1 to the program 
counter. This effectively bypasses the intermediate subroutine. 
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A PUSH WITHOUT A POP 


Near the beginning of the system monitor, explained in Chapter 6, there is a 
restart address called WARM. The program normally branches back to this 
point at the conclusion of each task. Thus the final instruction of each task 
could be: 


JMP WARM 


A more efficient method, however, is to push this restart address WARM 
onto. the stack at the beginning of the task. Then if the task does not termi- 
nate within a subroutine, a simple return instruction, rather than a jump, can 
be given at the end of the task. This causes a branch back to WARM. 


WARM? LXI HyWARM ¢Hel = HERE <----! 
PUSH H yONTO STACK ! 

° . ° ! 

° . e ! 

JZ OPORT ! 

! 

! 


OPORT: ... ! 
RET Deena nnn --------- ! 


This example is an exception to the rule that we should have a POP instruc- 
tion for every PUSH. Here, there is a PUSH but no POP. Of course there is 
also a RET with no CALL. So everything is all right—or is it? What happens 
if termination occurs from a subroutine? 


GETTING BACK FROM A SUBROUTINE 


If a particular task terminates in a subroutine, then this subroutine’s return 
address must be popped off the stack (or an INX SP instruction must be 
executed twice) before the return is issued. 


WARM? oo ¢ @ Qe ee ee eee ! 
JZ DUMF 


DUMP: oe 6 
CAL TSTOP 


TSTOPS «6 «© ¢ ! 


- 
° 
: 
i 
i 
1 
! 
i 
i 
i 
i 
i 
| 
i 
i 
j 
i 
H 


RNC $NORMAL RETURN >-! 
POP H RAISE STACK 
RET TO WARM tee a ' 


The stack pointer grows downward through memory during use. It is 
therefore common practice to place the stack as high as possible in available 
memory. But the system monitor may be located at the actual top of mem- 
ory. In this case the stack can initially be placed lower in memory at the 
beginning of the monitor. 
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START? 
LXI SP»START 


On the other hand, the monitor may be placed in read-only memory (ROM). 
In this case, the stack can be located at the actual top of read/write memory. 
(While both read/write memory and ROM are random-access memory— 
RAM, it is customary to refer to read/write memory as RAM and read-only 
memory as ROM. This convention will be followed here.) 


AUTOMATIC STACK PLACEMENT 


The placement of the stack at the top of RAM can be done automatically, so 
that the total amount of RAM can be changed without having to reprogram 
the PROM monitor. A short routine can test each block of memory starting 
at zero until it finds a location that can’t be changed. The stack is then put 
at the beginning of this block. Remember, the stack pointer is always decre- 
mented before use; therefore, it can be initially defined as one location 
above usable memory. 

The first part of the program is a memory search routine that starts at 
address zero. It moves the byte from that location into the accumulator, 
complements it, then moves the complemented byte back to the original 
location. A comparison is made to see if the memory location does indeed 
contain the complemented byte. If it does, the accumulator is comple- 
mented back to the original byte and returned to memory. Such an algo- 
rithm is often called a nondestructive memory test. 

The first byte of each subsequent block of memory is checked in this 
way until a failure is found. This will usually reflect the top of usable mem- 
ory, but of course, it could indicate defective memory. The following pro- 
gram will work properly if placed in read-only memory. 


ROUTINE TO AUTOMATICALLY PLACE THE 
STACK AT THE TOP OF MEMORY 


<a> <a> ~er <a> ~e> 


8080 CODE 

LXI H»0 sFIRST ADDR 

NEXTP? MOV Arm sGET BYTE 
CMA 3 COMPLEMENT 
MOV MrA sPUT IT BACK 
CMF M 5 COMPARE? 
JNZ TOP sNO*r DONE 
CMA §BACK TO ORIG 
MOV MrA sPUT IT BACK 
INR H sNEXT BLOCK 
JMP NEXTP sKEEP GOING 

, 

TOP: SPHL sSET STACK 


CALL OUTHL sPRINT IT 


o ¢ © 
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This program might not work, however, if it is placed in read/write memory. 
The problem occurs because the routine is changing various locations in 
memory. If it happens to change its own instructions, then the results will 
be unpredictable. 

The shortcomings of the previous program are solved with the follow- 
ing version. The improved version will operate properly no matter where it 
is placed. The stack will be placed at the top of contiguous RAM unless the 
routine itself is in that part of memory. In that case, the stack will be placed 
at the beginning of the program. The Z-80 version is shown, but the program 
can be run on an 8080 if two minor changes are made. The relative jump 
instruction must be changed to an absolute jump and the DJNZ instruction 
must be changed to the equivalent DCR B and JNZ combination. 


ROUTINE TO AUTOMATICALLY PLACE THE 
STACK AT THE TOP OF MEMORY 
FAILSAFE VERSION (Z-80 CODE) 


“a> “Or cm <a> eo 


START: LD HL 70 §START CHECK AT 0 
LD BrySTART SHR 8 
NEXTP: LD Av(HL) #¢GET BYTE 
CPL sCOMPLEMENT IT 
LD (HL)»A #PUT IT BACK 
CP (HL) sDID IT GO? 
JR Z»TOP §NOr DONE 
CPL sBACK TO ORIG 
LD (HL) 2A #RESTORE 
INC H sNEXT BLOCK 


DJINZ NEXTP SARE WE HERE? 


TOP: LD SP» HL §SET STACK 


The new version works in the following way. The B register initially 
contains the block number of the routine itself. The value in B is decre- 
mented as each successive block is checked. If the routine is in ROM, then 
the end of usable memory will be found, as in the previous version. The 
program will loop between the label NEXTP and the DJNZ NEXTP instruc- 
tion. At some point, the CP (HL) instruction will reset the zero flag and the 
computer will jump to the address of TOP. The stack will then be placed at 
the top of RAM. 

Alternately, if this routine is placed in the lower memory area, then the 
DJNZ instruction will decrement the B register all the way to zero. The zero 
flag will be set and the program will move on to TOP. Now the stack will be 
set to the beginning of the memory block that contains the program itself. 

The START SHR 8 expression at the beginning of the routine instructs 
the assembler to calculate the high byte of the address of START and make 
it the second operand of the LD B instruction. It does this by shifting the 
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address of START by eight bits to the right, then taking the low-order eight 
bits of the result. Some assemblers allow an equivalent operand of 


HIGH START 


which is easier to comprehend. This automatic stack routine is incorporated 
into the system monitor explained in Chapter 6. 


CHAPTER FOUR 


Input and Output 


Computers would not be very useful if they could not interact with the 
outside world. Commands and data are sent to the computer from the key- 
board, magnetic tape, disk, and other peripherals. Results of computations 
are sent back from the computer to the printer, video terminal, tape unit, 
disk, and so on. Such input and output (I/O) transfers on a microcomputer 
are typically accomplished through special memory locations called I/O 
ports. One type of port is distinctly different from main memory. The other 
type of arrangement utilizes one of the regular main memory locations. The 
peripheral in this latter case is then said to use memory-mapped I/O. Each 
method has advantages and disadvantages. In either case, the I/O port will 
transfer eight bits, the natural word size for the 8080 and Z-80 CPUs. 


MEMORY-MAPPED I/O 


The I/O instructions on the 8080 microprocessor are rather limited com- 
pared to memory operations. There is a single IN and a single OUT instruc- 
tion for transferring eight bits of data. In contrast, there is a much larger 
collection of memory operations available. 


(8080 Mnemonics) (Z-80 mnemonics) 
80 LD (80) 2A 

LDA 81 LD A» (81) 
MoV Mec LD CHL) °C 
STAX D Lo (DE) 2A 
SHLD 84 LD (84) .HL 


These additional instructions can be utilized with memory-mapped I/O, 
greatly increasing the versatility of the Z-80 and 8080 I/O operations. 
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The STA instruction stores the 8-bit accumulator value at the memory 
address specified by the operand. If this address corresponds to a memory- 
mapped port, then the byte is sent to the peripheral. The LDA command 
reverses the operation. It can be used to input a byte from a port. The 
MOV M,C instruction can be used to transfer a byte from the C register to 
the memory location designated by the HL register pair. The STAX D com- 
mand moves a byte from the accumulator to the memory location desig- 
nated by the DE register pair. The SHLD instruction opens a new dimension. 
Since this operation transfers 16 bits of data from the HL register pair 
directly into two consecutive memory locations, two adjacent ports can be 
simultaneously serviced. 

The typical video console is a serial device that uses distinct ports. 
However, memory-mapped controller boards are commerically available. In 
this case, an ordinary TV set is then used for the video screen. There are also 
disk-controller boards that use memory-mapped operations to communicate 
with the disk drives. It is interesting to note that the Motorola 6600 CPU 
performs all of its I/O by memory mapping. There are no separate input or 
output instructions for this CPU. 


DISTINCT DATA PORTS 


Data ports may be designed to operate either in parallel or in serial fashion. 
Both the parallel and the serial I/O ports are connected to the computer 
through the system bus by a set of eight data lines. In addition, the parallel 
port is connected to the peripheral by another set of eight data lines. The 
serial port, by contrast, has only two data lines connecting it to the peripheral. 

For some peripherals, such as a printer, data is transferred in only one 
direction. For others, such as the console and magnetic tape units, the 
peripheral is able to both send and receive data. In this latter case, there will 
be 16 data lines between the computer and the peripheral if a parallel port is 
used. Eight lines are used for sending data and eight are used for receiving 
data. The serial port, in contrast, will have three signal lines to the peripheral 
if there is two-way communication. One is for transmitting, one is for 
receiving, and the third is a common line for the other two. 

There may be additional lines between the computer and the periph- 
eral. One of these might indicate to the computer whether the terminal is 
operational. Another can be used to inform the terminal that the computer 
is ready. These extra lines are sometimes referred to as handshake lines. 

The computer usually operates at a much higher speed than the periph- 
erals. Consequently, there must be a mechanism for effectively slowing down 
the computer during I/O operations. For serial or parallel ports, this is 
typically accomplished by using two separate I/O ports for each peripheral 
device. One port is used for the data port and the other is used for the status 
port. Each of these two ports will have distinct addresses, one of the 256 
values available to the 8080 or Z-80 CPU for this purpose. There are three 
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general methods of performing I/O through data ports: looping, polling, and 
interrupting. 


LOOPING 


Looping is the simplest method of performing I/O through separate ports, 
and it is the one that is most commonly employed in 8080 and Z-80 pro- 
grams. The CPU performs output by sending a byte to the data port using 
the OUT instruction. The corresponding status port is then read with an IN 
instruction. One bit of the 8-bit status port reflects the condition of the 
corresponding peripheral. 

When the CPU places a byte in the data register, using the OUT com- 
mand, the output status bit of the status register is set. This may actually 
result in a logical 1 or a logical zero, depending on the port design. When the 
peripheral utilizes the byte that was placed into the data register, the output 
status bit of the status register is reset. These changes in the status bit are 
automatically handled by the I/O interface hardware. However, the program- 
mer must include in the software the appropriate routines for monitoring 
the status bits. 

As an example of the looping method, consider the following sub- 
routine: 


court: IN 10H ¥CHECK STATUS 
ANI 2 sSELECT BIT 
JZ COUT sNOT READY 
MOV Aro sGET BYTE 
OUT 11H *SEND 
RET § DONE 


This routine could be used to send a byte of data to the system console. The 
first instruction of the listing causes the CPU to read the 8-bit status port 
which has the address of 10 hex. The second instruction performs a masking 
AND operation to select the write-ready bit, bit 1. Remember that a logical 
AND with zero and anything else gives a result of zero. However, a logical 
AND with unity and a second logical value, gives the result of that second 
value. 

Suppose that the output status is indicated by a logical 1 of bit 1, where 
bit O is the least-significant bit of the register. Then, a logical AND with the 
value in the status register and with the number 2 will result in a logical 1 if 
the peripheral is ready. If the device is not ready, however, the result is a 
logical 0. 


0101 O111 status 0101 0101 
AND 0000 0010 = 2 0000 0010 
0000 0000 0000 0010 


ready not ready 
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Thus, the logical AND with the value of 2 in the status register gives a result 
of zero if bit 1 (the second bit) is 0. Otherwise, a nonzero result is obtained. 

The third instruction in the looping example is a conditional jump. If 
the peripheral is not ready, the JZ instruction will cause the computer to 
loop repeatedly through the first three lines until the peripheral is ready for 
another byte. At this point, the write-ready bit, bit 1, will be a logical 1. 
Then the logical AND operation, the second instruction of the subroutine, 
produces the nonzero value of 2. The MOV instruction following the condi- 
tional jump will then be executed. The byte to be outputted is moved to the 
accumulator, and then sent to data port 11 hex by use of the OUT command. 

When the byte to be output is actually sent to the data port, the write- 
ready flag is reset to a logical zero. The output routine may be immediately 
reentered for outputting another byte, but now the peripheral is not ready. 
Looping will occur again through the first three instructions of the output 
routine since the write-ready flag has been reset to zero. 

The CPU clock may be operating at 2 or 4 MHz. This rate is thousands 
of times faster than the speed of a typical printer. Consequently, if the 
looping method is used, the CPU will be spending over 99 percent of its time 
simply looping through the first three lines of the output subroutine. The 
computer will be spinning its wheels, so to speak, waiting on the peripheral. 

Because the CPU is operating so much faster than the peripherals, it 
can, in principle, service many peripherals simultaneously. A very simple but 
useful implementation of this idea is found on the CP/M* operating system. 
In the CP/M system,* console output is normally sent only to the console. 
This terminal is typically a high-speed video device. But if the user types a 
Control-P, then the list device is also turned on. Console output will now 
appear simultaneously at both the console and the line printer. 

This technique can be easily observed if the console video accepts data 
much faster than the line printer. Normally, as data is sent only to the con- 
sole, it appears rapidly on the video screen. But when the list device is 
turned on, the output appears much more slowly. The reason for the slow- 
down is that both peripherals are operating at the speed of the slower one, 
in this case the printer. 

A subroutine for accomplishing such a dual output might look like this. 


LOUT: IN LSTAT sLIST STATUS 
ANI 2 sOUTFUT MASK 
JZ LOUT sLOOP UNTIL READY 
MoV A»C *GET THE BYTE 
OUT LDATA sSEND TO LIST 
OUT CDATA sAND CONSOLE 
RET > DONE 


*CP/M is a registered trademark of Digital Research, Inc., Pacific Grove, California. 


52 8080/Z-80 ASSEMBLY LANGUAGE 


This routine is not the one that is actually used in the CP/M system since, 
with our routine, the console will always display everything that is sent to the 
printer. This feature does not increase printing time as long as the console 
operates faster than the printer. Notice that there is no need to check the 
console status register. The output rate is set at the speed of the printer, and 
so the console, which operates so much faster, will always be ready if the 
printer is ready. 


POLLING 


One way to improve the performance, or throughput, of a CPU is with a 
technique known as polling. In this method, the CPU sends a byte to each of 
several different peripherals. Each peripheral operates at its full speed. 
Polling is more efficient than the looping method, and has been incorporated 
into several commercial 8080 software products. One product is a multiuser 
BASIC which can service up to four separate consoles. Each user can inde- 
pendently perform calculations using the same BASIC interpreter. 

Another product that uses the polling technique is known as a spooler. 
The looping method is typically utilized for all output. In this case, all other 
activities must be halted while the printer is working. With a spooler pro- 
gram, however, things are different. When this program is incorporated into 
the system, the user can perform other tasks using the system console while 
a disk file is being printed. 

In the polling method, the I/O routines are somewhat different from 
the corresponding routines of the looping method. The output-ready flag of 
the status register is checked periodically as with the looping method. But if 
the status flag indicates that the device is not ready, the CPU returns to per- 
form some other task. Thus, the CPU does not waste time looping around 
the first three instructions of the input or output routine. A typical output 
routine using the polling method might look like tihis. 


LOUT: IN LSTAT sCHECK STATUS 
ANI LMASK sMASK FOR OUTPUT 
RZ sNOT READY 
MOV ArC sGET THE BYTE 
OUT LDATA sSEND IT 
RET 


While the polling method is a great improvement over the looping 
method, there are still problems. For example, a decision must be made as 
to how often each status register will be polled. An even better method is to 
use hardware interrupts. 


HARDWARE INTERRUPTS 


The 8080 and Z-80 microprocessors incorporate a hardware interrupt system. 
This feature allows an external device, such as the system console or printer, 
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to interrupt the current task of the processor. When the CPU is interrupted, 
it suspends its current task, and calls on one of several memory locations set 
aside for this purpose. The CPU services the request of the interrupting 
peripheral, then it returns to its previous task. 

In this method, the CPU does not have to be programmed to check the 
peripherals on a regular basis as with the method of polling; nor does it have 
to waste time in a loop. Instead, the peripheral interrupts the processor when 
it needs service. If several peripherals are able to interrupt the CPU, then 
there must be a method for prioritizing the requests. This ordering is accom- 
plished through a vectored interrupt system. For example, if a lower-priority 
device has interrupted the CPU for service, this phase can also be interrupted 
by a peripheral with a higher priority. On the other hand, a device with a 
lower priority cannot interrupt a higher-priority service, but must wait 
its turn. 

Usually, the highest-priority interrupt will be assigned to updating the 
system clock. If the computer misses a beat, then the time will be incorrect. 
The next lower priority could be assigned to disk transfer. The printer could 
have a low priority since it is a relatively slow device, and it won’t matter if 
it must slow down every so often. 

Suppose that the printer is operated by interrupts rather than by loop- 
ing or polling. The computer sends a byte to the printer, then continues with 
another task. When the current byte has actually been printed, the printer 
interrupts the CPU for another byte. In the time between the printing of 
two bytes, the CPU can perform many other tasks. 

The console keyboard is another peripheral that can be readily serviced 
by an interrupt system. In this case, each time the user presses a key, the 
CPU is interrupted from its current task. Of course, if the CPU is currently 
servicing a higher-priority interrupt, then the console keyboard request will 
have to wait. 

Both the 8080 and the Z-80 allocate eight addresses that can be used 
for the interrupt service routines. These addresses can be called by the eight, 
one-byte RST instructions. 


Z-80 8080 Instruction code Call 
mnemonic mnemonic hex binary address 
RST 00H RST 0 C7 1100 0111 00H 
RST 08H RST 1 CF 1100 1111 08H 
RST 10H RST 2 D7 1101 0111 10H 
RST 18H RST 3 DF 1101 1111 18H 
RST 20H RST 4 E7 1110 0111 20H 
RST 28H RST 5 EF 1110 1111 28H 
RST 30H RST 6 F7 1111 0111 30H 
RST 38H RST 7 FF 1111 1111 38H 


These instructions can be used as one-byte subroutine calls. As an example, 
suppose that the CPU executes an RST 5 instruction which corresponds to 
the instruction code EF hex. A subroutine call is then made to the corre- 
sponding address of 28 hex. The return address is pushed onto the stack, 
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just as for a regular subroutine call. Subsequent execution of a return instruc- 
tion will cause the program flow to return to the instruction immediately 
following the RST 5 instruction. 

Hardware interrupts operate by emulating the software RST call. When 
an interrupt occurs, the CPU automatically disables the interrupt flip-flop, 
thus further interrupts are prevented. Then a subroutine call is made to the 
corresponding call address. This is done by jamming the desired RST code 
onto the data bus. The simplest implementation is to use a single interrupting 
device and the RST 7 instruction. (A normal interrupt always performs an 
RST 7.) The interrupting peripheral momentarily changes the state of the 
interrupt-request bus line. For the S-100 bus, this would require that bus line 
73 be pulled to a zero-voltage state from the usual 5-volt level. The CPU 
responds by automatically calling memory address 38 hex. The programmer 
will have previously placed the service routine at this location. The service 
routine will conclude with a command to re-enable the interrupt flip-flop. 
Then a return instruction will be executed. 

The trouble with this simple approach is that the RST 7 call to location 
38 hex interferes with system debuggers because they also use this address. 
Consequently, another interrupt level is more suitable. Unfortunately, a 
single interrupt system always calls the RST 7 location. One solution to this 
problem is to use a vectored interrupt board. A vectored interrupt board 
allows the user to select up to eight separate interrupt levels corresponding 
to the RST 0 to 7 instructions. The disadvantage of this approach is the 
cost, since a vectored interrupt board may sell for several hundred dollars. 

However, there is a low-cost solution. If only one interrupt level is 
required, a single hardware interrupt can be converted from an RST 7 to 
some other level such as an RST 5 by using only two logic gates. The circuit 
shown in Figure 4.1 will make the needed translation. The output of the 
two-input NAND gate IC-1 goes low when both of the input lines are high. 
One of these inputs is SINTA, line 96 on the S-100 bus. It is a CPU status 
signal that indicates acknowledgment of the interrupt request. The other 
input is PDBIN, bus line 78. This signal indicates that the data bus is in the 
input mode. 


SINTA 


Figure 4.1. Circuit to convert an 8080 interrupt to an RST 5. 


When the output of IC-1 goes low, it turns on the three-state buffer 
IC-2. This pulls the data-input bus line DI4 low. Since the remaining seven 
lines of the data-in bus are high, the CPU will see the value of 


1110 1111 
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Notice that this is the bit pattern for the RST 5 instruction. The result is 
that the CPU executes an RST 5 instruction, by calling address 28 hex. The 
interrupt service routine, or a jump to it, is placed at this address. 


AN INTERRUPT-DRIVEN KEYBOARD 


We have seen that a printer operates considerably slower than a CPU. The 
console keyboard is even slower than the printer, especially if the operator 
is not an expert typist. Conversion to an interrupt-driven keyboard will 
considerably increase the effectiveness of a computer. 

Characters entered on an interrupt-driven keyboard are temporarily 
stored in a memory buffer area. Each time a key is pressed on the console, 
the CPU is interrupted from its current task. The new byte is read and 
placed into the keyboard buffer. The computer then returns to its prior task. 
When the computer needs console input, it gets it from the input buffer, 
rather than from the console itself. 

An interface program, utilizing a keyboard-interrupt approach, is 
shown in Listing 4.1. This program provides the necessary routines for 
interfacing the Lifeboart version of CP/M to a North Star disk system.* The 
portions of the program which specifically utilize the interrupt routines 
begin with a row of asterisks and end with a row of semicolons. 


Computer Computer Keyboard Keyboard 
pointer count count pointer 


Buffer 


F400 F402 F403 F404 F406 


Figure 4.2. The input buffer and pointers. 


The layout of the memory buffer with its pointers is shown in Figure 
4.2. The buffer area is arbitrarily chosen to start at the address of F400 hex. 
The location can be anywhere above the CP/M operating system. There is 
only one keyboard buffer, but there are two sets of pointers: one for the 
CPU and one for the keyboard. Two counters are also utilized; one shows 
how many characters have been entered from the keyboard and the other 
shows how many have been read by the computer. Since both sets of pointers 
grow larger, they need to be reset periodically. The two pointers are com- 
pared after each carriage return. If they are the same, then they are both 
reset to the beginning of the buffer. 

Suppose that this interface program is incorporated into your system. 
CP/M might be printing something on the console video screen when a key 
on the console is pressed. A hardware interrupt will occur, causing the com- 
puter to stop its task and call address 28 hex (RST 5). A jump instruction at 
address 28 hex will transfer control to subroutine KEYBD. The keyboard 


*Lifeboart Associates, 2248 Broadway, New York, N.Y. 10024. 
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Listings 4.1. 


0000 
FFFF 


FFFF 
FFFF 


0036 
1600 
DBOO 
4900 


0003 
ooon 
000A 
000C 
0003 
0004 
ool1 
0013 


DSB1 


ou 


2E4465 


ind bond dou tl 


Interrupt 


TITLE 


<> E> “E> “E> “er “E> “er a> ~er er er « 


driven keyboard, 


‘Interrurt CP/M BIOS’ 


(Put today’s date here) 


LIFEBOAT VERSION WITH OPTION FOR 
EITHER SINGLE OR DOUBLE DENSITY 


TERMINAL DEVICES SUPPORTED: 


CONSOLE 10 HEX CON: 
LIST- 12 HEX LST: 
FHONE MODEM 14 HEX FUN? 
FALSE EQU c¢) 
TRUE EQU NOT FALSE 
y 
DOUBLE EQU TRUE sDOUBLE DENSITY 
INTRM EQU TRUE yINTERR VERSION 
’ 
IF DOUBLE 
MSIZE EQu 34 sDECIMAL K 
BIOS EQU MSIZEX1024-200H 
USER EQU BIOS+S500H 
OFFSET EQU 1FOOH-BIOS 
ELSE sSINGLE DENSITY 
MSIZE EQU 36 
USER EQU MSIZEX1024-700H 
ENDIF 
IOBYTE EQU 3 §1/0 SETUP 
CR EQU ODH sCARRIAGE RET 
LF EQu OAH sLINEFEED 
FFEED EQU 12 s>FORMFEED 
CTRC EQu 3 ¢°Cy KILL SCROLL 
CTRO EQU 4 9D» EMPTY BUFFER 
CTRQ EQU 17 §°Qs SCROLL 
CTRS EQU 19 9S» FREEZE SCROLL 
, 
IF DOUBLE 
9 PATCH DATE 
ORG BIOS-100H+OB1H 
ELSE 
ORG USER-600H+0OAFH 
ENDIF 
DB ‘Jam 28780’ sPATCH DATE 
y 
ORG USER 
y 
CSTAT EQU 10H sCONSOLE STATUS 
CDUATA EQu CSTAT+1 sCONSOLE DATA 
CIMSK EQu 1 ¢INFUT MASK 
COMSK EQU 2 sOUTFUT MASK 
LSTAT EQU 12H sLIST STATUS 
LDATA EQU LSTAT+1 sLIST DATA 
LIMSK EQU 1 sINFUT MASK 
LOMSK EQU 2 sOUTFUT MASK 
LNULL EQU 0 sLIST NULLS 


0014 
0015 
0040 
0080 


00c4 
00CS 
00Cé 
00C7 


0095 


F400 
F400 
F402 
F403 
F404 
F406 
0005 


DOO 
DROS 
DROS 
DBO? 
DBOC 
DBOF 
DBI2 


DBR1S 
DB17 
DEI? 
BIB 
DBID 


DBIF 


DB21 


DB23 
DE24 
DB26 
DB28 
DR2A 


Hou uu 


fou ow ou 


How un Hou Hi 


C31i5SD8 
C3ABDB 
C3030B 
C3120 
C3260C 
C3480nC 
C30US0R 


3E03 
0310 
0312 
3E15 
0312 


SEIS 


0310 


AF 

D3cS 
D3C7 
3E70 
H3c4 


MSTAT EQU 
MIATA EQU 
MIMSK EQU 
MOMSK EQU 


14H 
MSTAT+1 
40H 
80H 
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sMODEM STATUS 
sMODEM DATA 
sINPUT MASK 
sOUTPUT MASK 


y 
+ INITIALIZE FORTS FOR COMPUTIME BOARD 


ADATA EQU 
ACONT EQU 
BDATA EQU 
BCONT EQU 


OC4H 

ADATAt1 
ADATAt2 
ALATAtF3 


FOO OOOO IK KKK KOK 


IF 
STOP EQU 


INTRM 
9SH 


s INTERRUPTS 
¢SET FOR INTERR 


’ 
¢ CONSOLE INFUT-BUFFER LOCATION 


BUFFER EQU 
CFNTR EQU 
CCNT EQU 
KCNT EQuU 
KPNTR EQu 
BUFF EQU 


JMP 
JMP 
JMF 
JMP 
JMF 
JMF 
JMF 


bt er er er 


NIT? MVI 
OUT 
OUT 
MVI 
OUT 


IF 
MVI 
ENDIF 


ot 


OUT 


se> “a> o> 


XRA 
OuT 
OUT 
MVI 
OUT 


OF 400H 
BUFFER 
CPNTR+2 
CCNTH1 
KCNT+1 


BARR eRe Re RRR EEE ERED 
7 


Av3 

CSTAT 
LSTAT 
Av1SH 
LSTAT 


INTRM 
Ay STOP 


CSTAT 


A 

ACONT 
BCONT 
Ay70H 
ALATA 


sINFUT BUFFER 
*COMPUTER FOINTER 
sRUFFER COUNT 
sKEYBRD) BUFF COUNT 
sKEYBOARD POINTER 
¢INFUT BUFFER 
sINTERR LEVEL 
¥INTERRUFTS 


< 
> 
< 
~~ 
> 
ao 
> 


s INITIALIZATION 
sCONSOLE STATUS 
sCONSOLE INFUT 

sCONSOLE OUTPUT 
gLIST OUTFUT 


sFOR READER 


INITIALIZATION ROUTINES 


PRESET 
+ INTERFACE 


9SET FOR INTERR. 


gs INTERFACE 


COMPUTIME BOARD INITIALIZATION 


sGET A ZERO 
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DB2C 
DB2E 
DB3O 
DR32 
DB34 
DBS 


DR38 
TER39 
DRE 
DRSE 
DR3F 
DB42 
0B45 
B48 
DIB4E 
DR4E 
DES1 
DBS4 
DBSS 


DBSS6 
DRS7 
IIBSA 


3E77 
D3C4é 
3E14 
D3cs 
3E04 
03C7 


AF 
320300 
C9 


FS 
DB10 
E601 
CA92DB 
DB11 
E&7F 


FE13 
C27F DR 
DB10 
E601 
CA6CDOR 
DB1i1 
E67F 
FEI1 
C26CDR 
C392DB 


MVI 
OUT 
MVI 
OUT 
MVI 
OUT 


Ay77H 
BDATA 
A»x14H 
ACONT 
Ax4 

BCONT 


9 OOOO OK KK KK KKK KKK KKK KKK 


FATCH 


=> > «> 


te> er er o> 


IF 


INTRM 


RST LOCATION TO JUMF TO KEYED 


OI 
MVI 
STA 
FUSH 
LXI 
SHLD 
LXI 


XRA 
STA 
RET 


sDISABLE INTERR 
Av,OC3H *#JMF INSTR 
BxLEV sFATCH RST 
H 
H»KEYBD ¢INTERR ENTRY 
BxLEV+1 5 JUMP HERE 
Hy BUFF $sBUFFER ADDR 
KFNTR sRESET FOINTERS 


CFNTR 
HrO 92 ZEROS 
CCNT *ZERO THE COUNTS 


sRE-ENABLE INTERR 
s INTERRUPTS 


aeaaeennaan 


INITIALIZE IOBYTE 


A *RESET IOBYTE 
IOBYTE 


FORO OOOO KOK KK KK KK KK 


A 
5 
* 
, 
° 
, 

K 


EYER: 


CHECK 


<> er ~e> 


KEY43 


IF 


FUSH 
IN 
ANTI 
JZ 
IN 
ANI 


FOR 


“Sy 


INTRM 


INTERRUFT ENTRY FOR KEYBOARD INPUT 


PSW 

CSTAT sCONSOLE STATUS 
CIMSK 

KEY2 sNOT READY 
CLATA 9GET DATA 

7FH gMASK FARITY 


“@Q SCROLL CONTROL 


CTRS 9”S 

KEY3 9NO 

CSTAT sCHECK KEYEOART 
CIMSK sREADY? 


KEY4 sLOOF UNTIL REAILY 
CLATA 9GET BYTE 

7FH gSTRIF FARITY 
CTRQ 9° QP 

KEY4 9NO 

KEY2 


DE7F 
DBO 
DB82 
DEBS 
E88 

‘DE89 
DEBA 
DESL 
TRIO 
DB 1 


DB92 
DRESS 
DB94 


DBS 
DES 


DB9OB 
DEVE 
DRA1L 
DRA4 
DVRA7 
DEAA 


DRAB 
DBAE 
DEBO 


DBRS 
DBR4 
DBR? 
DBRS 
DBRS 
DBBA 


UBBR 
DBBC 
DBRF 
DECO 
DBC1 
DBCS 


CHOBDB 
C39108 


210000 
2202F4 
2106F4 
2204F4 
2200F4 
co 


3A0300 
E602 
C2CRIIB 


ES 
2A02F4 


ES 
2A00F4 
7E 

Et 
FEO3 
CAC8DB 
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KEY33 PUSH H 
CFI CTRD sEMPTY BUFFER? 
JZ KEYS *YES 
LHL KF NTR +RUFFER POINTER 
MOV MrA sFUT IT THERE 
INX H *INR FOINTER 
SHLD KPNTR ¥SAVE POINTER 
LXI HyKCNT ¥#GET COUNT 
INR M yINCREMENT IT 

KEYS$ FOF H 

9 

KEY23 FOF FSW 
EI 
RET 

; 

KEY63 CALL RSETP sRESET POINTERS 
JMF KEYS 

Y 

¢ RESET BOTH FOINTERS TO START 

y 

RSETP: LXI H»0 
SHLD CCNT #ZERO BOTH 
LXI H» BUFF 
SHLD KPNTR sRESET FNTRS 
SHLD CFNTR 
RET 
ENDIF i INTERRUPTS 

ee 


CHECK FOR CONSOLE INFUT REALLY 


CT) <a> a> <> > 


ONST? LIA IOBYTE 
ANI 2 
JNZ LISST sLIST 


, 
FOO OO OOOO IOC KOK KK 
IF INTRM 


CHECK INPUT BUFFER RATHER THAN KEYBOART 


<a> er <a> 


FUSH H 
LHLD CCNT 9BROTH COUNTS 
MOV AvH 
SUB L sD IFFERENCE 
POP H 
RZ yNO INPUT 

y 
PUSH H 
LHLD CFPNTR ¢COMFUTER FNTR 
MOV AyM yNEXT CHAR 
POF H 
CPI CTRC +“C? 
JZ QUIT sYES» QUIT 


MAKE CP/M THINK THERE IS NO INFUT 
SO SCROLLING WON’T BE ABORTED 


<a> er “er ser 
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DBCS6 
DBC7 


DBC8 
TDBCA 


DBCE 
DBCH 
DBCF 
DBDO 
DED2 


DED3 
DBS 
nNBDSs 


AF 
c9 


SEFF 
C9 


DBI2 
E601 
c8 
SEFF 
c9 


3A0300 
E602 
C206DC 


C201DC 


RET 


CONSOLE INFUT 


Ow wow 


LDA 
ANI 
JNZ 


ONIN: 


A sGET ZERO 

SNOT INTERRUFTS 
CSTAT sGET STATUS 
CIMSK 

sNOT READY 

s INTERRUPTS 
Ay TRUE 


sINPUT READY 


READY FOR CONSOLE 


LSTAT 
LIMSK 

sNOT READY 
A» TRUE 

+REATLY 
IOBYTE 
2 
LIN sLIST INPUT 


g 
JOO OOOO IKK K 


IF 


“o> a> “er ~e> 


CIN3: 


RESET BOTH 


<> <a> “er 


INX 
SHLD 
CPI 
JINZ 
LHLD 
MOV 
SUR 
JINZ 


<> er er 


INTRM sy INTERRUPTS 


GET INFUT FROM KEYBOARD BUFFER 
INSTEAD OF FROM CONSOLE 


H 

CCNT §>BOTH COUNTS 

AvH 

L 9SAME? 

CIN3 sKEEF TRYING 
sHOLD OFF 

H»yCCNT sCOMFPUTER COUNT 

M INCREMENT IT 

CPNTR +COMPUTER FNTR 

AyM sGET BYTE 


FOINTERS IF CARR RET FOUND 


H sBUMF FOINTER 
CPNTR sSAVE IT 

CR sCARRIAGE RET? 
CIN4 +NO 

CCNT 3GET BOTH COUNTS 
AvH 

L + DIFFERENCE 

CINS sNOT SAME 


RESET BOTH POINTERS TO ZERO 


DBFE 
neo. 
Nicos 
DC04 
ncos 


NC0S 
ncos 
NCOA 
ncop 
DCOF 
mci 


pC12 
pcis 
0017 
nc18 


DC1ikz 
ncin 
NC1F 
Nnc22 
NC23 
nC25 


NC26 
nc29 
DNC2B 


NC2eE 
DC30 
DC32 
nC35 
NC346 


CUSBDE 


DB12 
E601 
CA06DC 
DB13 
E67F 
C9 


3A0300 
E603 
B7 
E22E0C 


DB10 
E602 
CA1LRDC 
79 
D3il 
c9 


3A0300 
E640 
C21B0NC 


[7 <> o> > 


[7 <> <a> <> 


- 


<> er er 


IN; 


OUT: 


CALL 


RET 
ENDIF 


CONSOLE INFUT 


CONSOLE OUTFUT 


ONOUT: LDA 


ANI 


LIST OUTPUT 


LDA 
ANT 
JNZ 


IN 
ANI 
JZ 
MOV 
OUT 


IF 


NULLS FOR LIST 
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RSETF 

ArCR sRESTORE CR 

H 
sREADY FOR MORE 

i 
gNO INTERRUPTS 

CSTAT *CHECK STATUS 

CIMSK 

CIN2 

CDATA *GET DATA 

7FH sMASK PARITY 
¥INTRM 

FROM LIST 

LSTAT 

LIMSK 

LIN 

LITA 

7FH 

IOBYTE *#WHERE? 

3 

A 

LIST 

CSTAT *CHECK STATUS 

COMSK 

CONW 

ArC *GET BYTE 

CLATA ySEND IT 

IOBYTE 

40H sRIT 6 

CONW sCONSOLE OUT 

LSTAT sCHECK STATUS 

LOMSK 

LIST 

ArC 9GET BYTE 

LIATA sSEND IT 

LNULL = O 


DEVICE 


62 8080/Z-80 ASSEMBLY LANGUAGE 


1Ic38 
Iic3Aa 


lic3k 
DC3Cc 
TC3F 
nic42 
nC43 
NC46 
C47 


pC48 
nc49 
NC4B 
ne4c 
nc4pD 
NC 4F 
nicso 
NC3S3 
nc3Ss 
nc58 
DCSB 
nceso 


DCSE 
nCé1 
Nicé3 
nCcé5 
DCé68 


DC4&9 
NIC6E 
ncén 
nc70 
nC71 
1Ic73 


FEOC 
co 


CS 
O10A09 
CH2ENC 
0S 
C23FIC 
C1 
C9 


79 
E67F 
B7 

cs 
FEOA 
cs 
CH6gnc 
FEOD 
CASEDC 
cn74pC 
D311 
Cc? 


co740c 
N3ii 
FEOn 
C2S5ENC 
C9 


B14 
E680 
CAS69NIC 
79 
D315 
C9 


“er er “e> 


EMULATE FORMFEED 


LSKIFS 


x ww xzrwwe 


‘a> er o> 


FUNCH 


UNCH;: 


SEND 


ODCR;: 


MODEM 


OUT? 


MODEM 


ANTI 
CFI 
INZ 
MVI 
CALL 
CALL 
CALL 
JMP 


ENDIF 


CFI 
RNZ 


FFEED 


91 NULL 
92 NULLS 
93 NULLS 
74 NULLS 


sFORMFEED? 
+NO 


WITH 9 LINES 


FUSH B 

LXI By 9OOH+LF 

CALL LIST 

NCR BR 

JNZ LSKIF 

FOF B 

RET 

QUTPUT SENT TO MOLIEM 

MOV ArC 9GET BYTE 

ANI 7FH 

ORA A gNULL? 

RZ sDON’T SENT 
CFI LF 

RZ ¢SKIF LINEFEED 
CALL MOUT +SEND 

CFI CR 

JZ MOLICR yWAIT FOR CR 
CALL MIN sMODEM INPUT 
OUT CLATA sSEND TO CONSOLE 
RET 


INFUT 


CR TO MODEM,» 


MIN 
CLIATA 
CR 
MOIICR 


MSTAT 
MOMSK 
MOUT 
Ar»C 
MIIATA 


WAIT FOR ONE BACK 


9TO CONSOLE 


*#KEEF TRYING 


yCHECK STATUS 


9GET BYTE 
9SEND IT 
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NC74 DR14 MIN: IN MSTAT s+CHECK STATUS 
nC76 E640 ANI MIMSK 
nC78 CA740C JZ MIN 
DC7EK DBiS IN MIATA sGET BYTE 
nC7D E67F ANI 7FH *MASK FPARITY 
QC7F C9 RET 

5 
BDC80 313220 Dg 1-28-80’ s VERSION 

; 
nc8s END 


symbol table 


00CS ACONT 0OC4 ALATA 0O0C7 BCONT OOCS BIIATA 
01600 BIOS F400 BUFFER F406 BUFF F402 CCNT 
0011 CDIATA 0001 CIMSK DBIC CINS DCO3 CIN4 
nC01 CINS 0002 COMSK DEIS CONIN C12 CONOUT 
DRAR CONST nCc1ik CONW F400 CFNTR ooor CR 
0010 CSTAT 0003 CTRC 0004 CTR 0011 CTRQ 
0013 CTRS FFFF DIOQUBLE 0000 FALSE OOOC FFEEL 
0NC38 FORM 0NB1IS INIT FFFF INTRM 0003 TOBYTE 
F403 KCNT DR92 KEY2 DE7F KEYS DR6C KEY4 
DE91 KEYS DB9S KEYS DBSE KEYRD F404 KFNTR 
0013 LDIATA 0005 LEV O00A LF 0001 LIMSK 
DNCO6 LIN DECK LISST DC2ZE LIST 0000 LNULL 
0002 LOMSK 0NC26 LOUT DC3F LSKIF 0012 LSTAT 
0015 MIATA 0040 MIMSK 0C74 MIN DCSE MOLNCR 
0080 MOMSK DC69 MOUT 0036 MSIZE 0014 MSTAT 
4900 OFFSET 0NC48 PUNCH DEC8 QUIT DNR9R RSETF 
DROO START 0095 STOF FFFF TRUE DBOO USER 


entry is read with an IN instruction. The byte is then placed into the key- 
board buffer and the buffer pointer and buffer count are both incremented. 
The interrupt flip-flop is enabled with an EI instruction, then the computer 
returns to its previous task. 

When the CPU needs another byte, it gets it from the keyboard buffer 
in memory, rather than from the keyboard itself. The instructions starting at 
subroutine CONIN perform this step. The separate buffer pointer and buffer 
count, maintained for the CPU, are both incremented. 

The interrupt-driven keyboard can be utilized with most of the CP/M 
systems programs. For example, if a BASIC interpreter has been loaded and 
a source program has been entered, then the source program can first be 
listed, then executed by typing the following two lines. 


LIST 
RUN 


The second command can be given immediately following the first, even 
though the first task has not been completed. The second command will not 
be displayed on the console, however, until the completion of the first task. 
Therefore, the operator must type carefully. 
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SCROLL CONTROL AND TASK ABORTION 


Data can appear (scroll) too rapidly on a high-speed video screen. With the 
usual CP/M arrangement, the user can type a Control-S to freeze the video 
display. Typing any other character will cause scrolling to resume. The 
interrupt-driven routine given in Listing 4.1 incorporates its own scroll con- 
trol. Typing a Control-S freezes the screen, just as with the usual CP/M 
setup. However, scrolling can only be resumed by typing a Control-Q. The 
two commands, Control-S and Control-Q, are treated distinctly; they are 
not placed into the input buffer, but are acted upon immediately. 

CP/M tasks are normally aborted by typing any keyboard character. On 
the other hand, a Control-C is required in Microsoft BASIC, and a Control-E 
is used by Xitan BASIC for aborting the current task. This protocol has been 
altered so that characters can be entered into the keyboard buffer during a 
scroll operation. Nevertheless, it may be desirable to abort a task. 

If no characters have been typed ahead, that is, if the computer is 
executing the latest command, then a Control-C command will abort the 
current operation. Alternatively, if there are characters waiting in the console- 
input buffer, then these must be flushed out by typing a Control-D. At this 
point, a Control-C can be typed to abort the task. This arrangement will 
work with most programs, including Microsoft BASIC and Tarbell BASIC. 
If you use Xitan BASIC, then you must change the abort command character 
in the interface routine from a Control-C to a Control-E. 

An additional alteration is necessary for the Word-Master text editor. 
First of all, Word-Master buffers the keyboard buffer using software routines. 
Consequently, a hardware-interrupt system is unnecessary. Secondly, Word- 
Master uses Control-C and Control-D for system commands. Control-C is 
used to display the next screen and Control-D is used to move the cursor to 
the next word. If you want to use hardware interrupts with Word-Master, 
you must change the Control-C and Control-D commands in either the inter- 
face routine or in Word-Master. 


DATA TRANSMISSION BY TELEPHONE 


The process of transmitting information between a peripheral and the com- 
puter may be simple or it may be complex. If the system console is wired 
into the computer, or if the computer itself is built into the console, then 
the integrity of the transmitted data is not likely to be much of a problem. It 
may be, however, that the console is connected to the computer through a 
telephone line. The computer may be located across town or across the coun- 
try. In any case, connection through a telephone line complicates things. 

In a typical telephone arrangement, the data is sent from the console 
by modulating an acoustical carrier for transmission over the telephone line. 
The conversion is performed by an electronic device called a modem (the 
name is an abbreviation for MODulator-DEModulator). Two modems are 
required, one at each end of the telephone line. One converts the transmitted 
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signal to telephone frequencies, the other converts the signal back to the 
original data. 

The modem may also have an acoustical coupler. This allows a standard 
telephone headset to be pressed into two rubber-lined openings in the 
modem, making a direct connection between the modem and the telephone 
line unnecessary. 

There will usually be two data carrier signals at different frequencies. 
This allows simultaneous two-way, or full duplex, operation. The computer 
can transmit data to the console on one carrier while the console is trans- 
mitting data to the computer on the other carrier. 

A microcomputer can produce a more effective link between a console 
and a large main-frame computer, especially if a relatively slow modem is 
utilized. A program can be developed using the microcomputer’s editor, 
then the resulting file can be automatically transmitted to the larger com- 
puter. A subroutine that can be used to link a microcomputer to a large 
computer is given in Listing 4.2. This routine can be readily incorporated 
into the system monitor introduced in Chapter 6. 


Listing 4.2 Connection to a largde computer 


CONNECT TO ANOTHER COMFUTER 
THROUGH PHONE MODEM 


sep “E> er a> <e> 


(Z-80 CODE) 

0014 DSTAT EQU 14H ¥STATUS 
0015 DDATA EQu DSTAT+1 
0040 DIMSK EQU 40H sINPUT MASK 
0080 DOMSK EQU 80H sOUT MASK 

y 
0004 CTRD EQU 4 9“Dr COFY 
S7A1 TYFLG EQu STACK+1 *#COPY FLAG 

, 
SBB3 AF DEC: XOR a #ZERO 
SBB4 32 S7A1 LD (TYFLG) 9A SRESET COFY 
SBB7 DB 14 DECIN: IN Ar (DSTAT) sREALY? 
SBB? ES 40 AND DIMSK 
SBBB 28 13 JR ZrsALTIN #NO 
SBBD 3A S7A1 LD Avy (TYFLG) sCOPY FLAG 
5BCO B7 OR A §TO MEMORY? 
SBC1 28 07 JR Z»DINS +NO 
SBC3 CD SBF1 CALL DINFUT §#GET BYTE 
SBC4é 77 LD CHL) »A #TO MEMORY 
SBC7 23 INC HL sFOINTER 
SBC8 18 03 JR DEC2 

, 
SBCA CD SBF1 DINS: CALL DINFUT $sGET BYTE 
SBCD CD S835 DEC2: CALL OUTT §TO CONSOLE 
SBDO CD 5827 ALTIN: CALL INSTAT *#CONSOLE 
SBD3 28 E2 JR Z»DECIN sNOT READY 
SBOS CD S8ia CALL INFUT2 #CONSOLE 
SBD8 FE 04 ALT2;3 CF CTR Fae t) 


SBDA 28 1A JR Z»DCOFPY #SET FLAG 
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SBDC CD SRE1 ALTS?$ CALL DECOUT +¢TO DEC 
SBDF 18 Dé JR DECIN *DEC INPUT 
, 
¢ OUTFUT A BYTE TO DEC 
, 
SBE1 FS DNECOUT? PUSH AF 
SBE2 CD SBEA CALL DORDY 
SBES Fi FOF AF 
SBE6 03 15 OUT (LUATA) 2A 
SBE8 18 CD JR DECIN 9NEXT 
, 
9 DEC INFUT READY 
, 
SBEA DB 14 DORDY: IN Ay (IISTAT) 
SBEC ES 80 AND DOMSK 
SBEE 28 Fi JR Z*DECOUT 
SBFO C9 RET 
, 
> INPUT FROM DEC MODEM 
, 
SBF1 0B 15 DINFUT? IN A» (DDATA) 
SBF3 E6& 7F AND DEL *MASK PARITY 
SBFS C9 RET 
, 
> SET DEC COPY FLAG. START COPYING 
* INTO MEMORY AT 100 HEX 
, 
SBF6é 21 0100 NCOFY: LOD HL »100H 
SRF9 3E O1 Lo Avil 
SBFB 32 S7A1 Li (TYFLG) 2A 
SBFE 18 B7 JR DECIN 
, 
END START 
PARITY CHECKING 


Parity checking provides a method of monitoring the integrity of data trans- 
mission. While there are several different schemes for digitally encoding the 
common characters, the ASCII method is frequently used for microcom- 
puters. The ASCII code, shown in Appendix A, requires only seven bits for 
each character. Since each byte of data contains eight bits, there is one bit 
available for use as a check bit. 

Consider the 7-bit pattern for the ASCII characters 2 and 3. 


ASCII 2 
ASCII 3 


011 0010 
011 0011 


The value of 2 is encoded with four logical zero bits and three logical 1 bits. 
The value of 3 is encoded with three logical zero bits and four logical 1 bits. 
A parity check can be obtained by including an additional bit on the left 
(high-order) end. 
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There are two common methods of generating the parity bit. One 
encoding method is called even parity. In this case, a leading zero bit is 
added if there are an even number of logical ones among the other seven 
bits. On the other hand, the parity bit would be a logical 1 if there are an 
odd number of logical ones among the other seven bits. With even parity 
coding, the ASCII characters 2 and 3 would look like this. 


2 1011 0010 
3 0011 0011 


Now the 8-bit representation of both the 2 and the 3 contains an even num- 
ber of logical ones (and an even number of logical zeros). 

An alternate approach is called odd parity. In this case, the operation is 
simply the inverse of even parity. The logic of the parity bit is chosen so that 
the resulting bit pattern contains an odd number of logical ones. Either even 
or odd parity encoding will provide a check on the integrity of the data 
transmission. 

Suppose that during transmission of the character 2, the rightmost bit 
became inverted. The console sent the even-parity bit pattern 


1011 0010 
but the computer received the bit pattern 
1011 0011 
A parity check, performed at the computer, would be able to detect the fact 


that there was an error. 
A typical console-input routine might look like this. 


CONIN: IN CMASK sCHECK STATUS 
ANI CIMSK sMASK FOR INFUT 
JZ CONIN sLOOP UNTIL READY 
IN CDATA §GET THE DATA 
ANI 7FH sREMOVE PARITY 
RET 


The next to the last instruction in this subroutine performs a logical AND 
with 7F hex. This step is used to remove the high-order bit of the byte since 
it is not needed for ASCII data. Instead of ignoring this eighth bit, we could 
use it as a parity check. An input routine to perform a check for parity 
looks like the following list. 
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CONIN: IN CMASK sCHECK STATUS 
ANI CIMSK yMASK FOR INPUT 
JZ CONIN sLOOP UNTIL READY 
IN CDATA sGET THE DATA 
ORA A sSET PARITY FLAG 
JPO PERROR #PARITY ERROR 
ANI 7FH sREMOVE PARITY 
RET 


, 
§ PARITY-ERROR MESSAGE 
; 

PERROR? « «+ » 


This routine is essentially the same as the one given immediately before, but 
after the data register has been read by the computer, the parity of the byte 
is determined. 

The ORA A instruction performs a logical OR of the accumulator with 
itself. A logical OR of any byte with itself will not change the byte. How- 
ever, it does affect the status flags in this case. After the OR operation, the 
parity flag will be set according to the parity of the accumulator. If the 
parity is found to be odd, then an error is present. The JPO instruction 
causes a jump to the parity-error routine in this case. However, if the parity 
is found to be even, then the byte in the accumulator does not contain a 
parity error. 

Notice that a parity check will not detect an even number of bit errors 
in a byte. There may be two, four, or six errors, and the parity check will 
not detect an error. This is not likely to be a practical problem, however, 
since the likelihood of two errors is much less than the likelihood of single 
errors. 

ASCII computer terminals usually have the ability to automatically 
transmit an eighth parity bit with the data. Furthermore, there will typically 
be a user-selectable switch for choosing either even or odd parity. There may 
also be the additional choices of always resetting or always setting the parity 
bit. The input routine can check for odd parity if the JPO instruction is 
changed to a JPE instruction. 

There are much more sophisticated methods of checking for transmis- 
sion errors. One of these is the checksum approach discussed in Chapter 9. 
With this method, the transmitted data are added together. At regular inter- 
vals, the sum, or its complement, is transmitted along with the data. When 
the data are decoded, the data are added up again and compared to the 
checksum. 

The Hamming error-correction code is even better than the checksum 
method. It not only detects errors, but can also correct them. In the end, 
however, it is wise to find out why errors occur, and to take the appropriate 
action to correct the problem. A dirty tape head, for example, can produce 
errors. Cleaning the head is better than relying on an error-correction 
scheme. 


CHAPTER FIVE 


Macros 


Sophisticated assemblers incorporate a macro processor. A macro is used to 
define a set of instructions which are associated with the macro name. Then 
whenever the macro name appears in the source program, the assembler 
substitutes the corresponding instructions. This is called a macro expansion. 

Suppose that we want to interchange the contents of two memory 
locations with the following instructions. 


LDA FIRST sGET FIRST BYTE 

PUSH PSW § SAVE 

LDA SECOND #¢GET SECOND 

STA FIRST sPUT INTO FIRST 

FOP FSW sGET FIRST 

STA SECOND *#PUT INTO SECOND 


This set of instructions can be defined in a macro called SWAP. 


SWAP MACRO sSWAP FIRST AND SECOND 
LDA FIRST sGET FIRST BYTE 
PUSH PSW 3 SAVE 
LDA SECOND §¢GET SECOND 
STA FIRST sFUT INTO FIRST 
POP PSwW sGET FIRST 
STA SECOND s¢PUT INTO SECOND 
ENDM 


The macro definition is placed near the top of the assembler source program. 
The first line defines the macro name; the last line terminates the definition. 
The name SWAP can now be used like an operation code. it is placed in 
the source program whenever the corresponding instructions are needed. 
When the assembler encounters the name SWAP, it substitutes the desired 
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instructions. The final binary code generated by the assembler is the same as 
it would be if the instructions had originally been entered into the source 
program. 

Each time the macro name SWAP appears in the source program, the 
same set of instructions will be generated and the same two memory loca- 
tions will be interchanged. The SWAP macro becomes more versatile if the 
memory locations can be changed. If the names of the memory locations 
are placed on the first line of the macro definition, they become dummy 
variables. 


SWAF MACRO FIRST: SECOND 


LIA FIRST sGET 1ST BYTE 
PUSH PSwW 3 SAVE 

LDA SECOND ¢GET 2ND 

STA FIRST sPUT INTO 1ST 
POP PSwW sGET 1ST 

STA SECOND ¢PUT INTO 2ND 
ENDM 


The actual parameters in the macro call are substituted for the dummy 
parameters at assembly time. The macro call 


SWAP HIGH, LOW 


generates the assembly language instructions 


LDA HIGH sGET 1ST BYTE 
PUSH FSW §SAVE 

LDA LOW sGET 2ND 

STA HIGH sPUT INTO 1ST 
POP PSW sGET 1ST 

STA LOW sPUT INTO 2ND 


The statement 
SWAP LEFT» RIGHT 


will produce the instructions 


LDA LEFT GET 1ST BYTE 
PUSH FSW 9 SAVE 

LDA RIGHT *GET 2ND 

STA LEFT sPUT INTO 1ST 
POP PSW sGET 1ST 

STA RIGHT sPUT INTO 2ND 


The structure of macros can be much more complicated than the above 
examples. One macro can be nested inside another. 
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OUTER MACRO 
IF FAST 
INNER MACRO 


ENDM $$ INNER 
ENDIF §9FAST 
ENDM s SOUTER 


Conditional assembly directives can be used to create different versions. 
Comments in the macro definition which begin with a single semicolon are 
reproduced in the macro expansion along with the op codes. But if the com- 
ments are preceded by two consecutive semicolons, then they will appear 
only in the macro definition, not in the macro expansion. 


GENERATING THREE OUTPUT ROUTINES WITH ONE MACRO 


A subroutine can be used whenever a set of instructions is needed at several 
places in a program. But there are times when a similar but different group 
of instructions is needed. A subroutine cannot be used in this case. Consider 
the three 8080 output routines that follow. The first serids a byte to the 
console, the second sends a byte to the list device, and the third sends a byte 
to the phone modem. 


cot; IN CSTAT 
ANI COMSK 
JZ coT 
MOV Arc 
OUT CDATA 
RET 

5 

LOT: IN LSTAT 
ANI LOMSK 
JZ LOT 
MOV Ar 
OuT LDATA 
RET 

, 

MOT: IN MSTAT 
ANI MOMSK 
JINZ MOT 
MOV Aro 
OUT MDATA 
RET 


The structure of these three routines is very similar. Each begins by 
reading the appropriate status register. Then a logical AND is performed to 
select the output-ready bit. Looping occurs until the peripheral is ready. The 
byte is moved from the C register into the accumulator and sent to the 
appropriate peripheral. Finally, a return instruction is executed. 
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These three routines are slightly different, hence they cannot be re- 
placed by a single subroutine. However, since they have similar structure 
they can be generated with a macro. The macro definition looks like this. 


OUTPUT MACRO ?Sr?Z sOUTPUT ROUTINES 


?7SkOT: IN ?S&STAT sCHECK STATUS 
ANI ?7S&OMSK #MASK FOR OUTPUT 
J8?7Z ?S&z0T sNOT READY 
MoV ArC sGET BYTE 
OuT ?S&DATA $SSEND IT 
RET 
ENDM 


It would appear near the beginning of the source program. The macro name 
chosen is OUTPUT and the two dummy arguments are ?S and ?Z. Dummy 
arguments can have the same form as any other identifier. A question mark 
was chosen as the first character so that the dummy arguments would be 
easier to find in the macro definition. You must be careful not to use register 
names such as A, B, H, or L for dummy arguments if these register names 
also appear in the macro. 

Each of the three output routines is generated by a one-line macro call. 


OUTPUT CrZ sCONSOLE OUTPUT 
OUTPUT LyrZ sLIST OUTPUT 

5 
OUTPUT My»NZ sMODEM OUTPUT 


Each line includes the appropriate parameters. At assembly time, the real 
arguments replace the dummy arguments of the macro. The ampersand 
character (&) is a concatenation operator. It separates a dummy argument 
from additional text. The macro processor substitutes the real parameter for 
the dummy argument, then joins it to the rest of the text. By this means the 
expression ?S&OT becomes LOT if the real argument is the letter L. 

Macro assemblers may give the user three options for the assembly 
listing: 


1. Show the macro call, the generated source line, and the resultant 
hex code. 

2. Show the macro call and the hex code. 

3. Show only the macro call. 


If option 1 is chosen, then the above three macro calls to OUTPUT will pro- 
duce the following. 
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OUTPUT MACRO ?Sr?Z sOUTPUT ROUTINES 


?S20T: IN ?S&STAT +CHECK STATUS 

ANI ?S&8OMSK #MASK FOR OUTPUT 

JS8&?Z ?380T sNOT READY 

MOV AsC sGET BYTE 

OUT ?7S&DATA $SENI IT 

RET 

ENDM 

, 

OUTPUT CrZ sCONSOLE OUTPUT 
4000+DB10 coT: IN CSTAT §CHECK STATUS 
4002+E602 ANI COMSK sMASK FOR OUTPUT 
4004+CA0040 JZ coT yNOT READY 
4007+79 MOV AsC 9GET BYTE 
4008+D311 OUT CDATA ¢SEND IT 
400AtC9 RET 

, 

OUTPUT Ly»Z sLIST OUTPUT 
400B+DB12 LOT: IN LSTAT sCHECK STATUS 
400D+E602 ANI LOMSK sMASK FOR OUTFUT 
400F+CA0B40 JZ LOT sNOT READY 
4012+79 MOV ArC sGET BYTE 
401340313 ouT LDATA sSEND IT 
4015+C9 RET 

, 

OUTPUT MyrNZ sMODEM OUTPUT 
4016+DB14 MOT: IN MSTAT §CHECK STATUS 
4018+E680 ANI MOMSK sMASK FOR OUTPUT 
401AtC21640 JNZ MOT sNOT READY 
401D+79 MoV ArC sGET BYTE 
401E+D315 OUT MDATA sSEND IT 
40204+C9 RET 


The first argument in the macro, ?S, is replaced by the actual argument. This 
is the letter C in the first call, the letter L in the second call, and the letter M 
in the third call. The second argument is used to select a JZ or JNZ instruc- 
tion for the third line of the macro expansion. 

Some assemblers automatically remove the ampersand symbol from the 
resultant assembly listing. Others leave the symbol in place. In this latter 
case, the first line of the first routine would look like this. 


C&OT; IN C&STAT #CHECK STATUS 


But this is a matter of style. The actual machine code generated is the same 
in either case. 


GENERATING Z-80 INSTRUCTIONS WITH AN 8080 ASSEMBLER 


If you have a Z-80 CPU but an 8080 macro assembler, such as the Digital 
Research MAC, you can run all of the 8080 programs just as they are given 
in this book. You can also do the Z-80 programs by using macros to generate 
the Z-80 instructions. For some of the instructions, the regular Zilog mne- 
monic can be used. For other instructions a slightly different format is 
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necessary. Consider, for example, the Z-80 instruction that performs a two’s 
complement on the accumulator. The Zilog mnemonic for this operation is 
NEG. A Z-80 assembler converts this mnemonic into the two hex bytes 
ED 44. With an 8080 macro assembler you can use the same mnemonic. 
Define the macro 


NEG MACRO § TWO’S COMPLEMENT 
DB OEDH:, 44H 
ENDM 


Then, the macro call 


NEG 


is placed in the source program when the Z-80 NEG instruction is needed. 
The 8080 macro assembler will insert the desired hex bytes ED 44 at this 
point. 

As another example, consider the Z-80 relative-jump instruction. This 
instruction can be implemented with a macro that uses the assembler’s pro- 
gram counter, a dollar sign. The macro definition looks like this. 


JR ADDR SRELATIVE JUMP 
DB 18H, ADDR-$-1 
ENDM 


The dummy parameter ADDR is the destination address of the jump. The 
macro call 


JR ERROR 


will generate the correct Z-80 code. The first byte will be 18 hex. The 
second byte will be the required displacement for the jump. 

The Z-80 instruction, DJNZ, can be generated in a similar way. This 
instruction decrements the B register and jumps relative to the address of 
the argument if the zero flag is not set. The macro definition is 


DINZ MACRO ADDR 
DB 10H» ADDR-$-1 


ENDM 


and the macro call looks like 


DJINZ LOOF 


This approach will work with most macro assemblers. There may be a prob- 
lem, however, with the interpretation of the dollar sign. This symbol usually 
refers to the address of the beginning of the current instruction. But for 
some assemblers, it is interpreted as the address of the following instruction. 
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If your assembler uses the latter interpretation, you will have to change the 
macro accordingly. If in doubt, check the user manual. 

Some Z-80 mnemonics are not compatible with the macro format. For 
example, the Z-80 instruction 


PUSH Ix 
cannot be generated with a macro called 
PUSH MACRO REG 


since PUSH is a regular 8080 mnemonic. One possibility is to name the 
macro PUSHIX instead. 


PUSHIX MACRO 
DB ODDH» OESH 
ENDM 


Similar problems occur with the commands POP IX, ADD IX,BC, SUB 
(IX+dis), and SET. A format that is different from the Z-80 mnemonic must 
be chosen in each of these cases. 

The Digital Research macro assembler has an added bonus. Frequently- 
used macros can be placed into a separate macro library and given the file 
extension of LIB. In fact, this assembler is supplied with a macro library 
called Z80.LIB that will generate all of the Z-80 instructions. The statement 


MACLIB Z80O 


is placed near the beginning of the regular source program. The assembler 
will then look in the file Z80.LIB for the required macros. 


EMULATING Z-80 INSTRUCTIONS WITH AN 8080 CPU 


The Z-80 CPU can execute many powerful instructions that are not available 
to the 8080. Some of these useful instructions are difficult to implement on 
an 8080, while others are simply combinations of regular 8080 instructions. 
The NEG instruction is one of the easiest to implement. The macro defini- 
tion is 


NEG MACRO 78080 TWO’S COMPLEMENT 
CMA 991’°S COMPLEMENT 
INR A §32°S COMPLEMENT 
ENDM 


Now, whenever a two’s complement is needed, the macro call 


NEG 
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is placed into the program. The assembler generates the required 8080 
mnemonics 


CMA 
INR A 


Another useful Z-80 operation is the arithmetic shift. This operation 
shifts all bits of a register one position to the left. The high-order bit is 
moved into carry, that is, the carry flag is set to a 1 if bit 7 was originally a 
value of 1. The carry flag is reset to zero if bit 7 was zero. A value of zero is 
placed into the low-order bit (bit zero). 

The 8080 instruction ADD A, which adds the value in the accumulator 
to itself, performs the arithmetic shift left. But for the 8080, this is the only 
register which can perform the shift. The Z-80 has an additional instruction 
which allows this operation to be performed on any of the general-purpose, 
8-bit registers or on the memory byte referenced by HL, IX, or IY. 

The following macro will generate a set of 8080 instructions for the 
arithmetic shift left operation. 


SLA MACRO REG sSHIFT LEFT ARITH 
MOV AsREG ¢9GET BYTE 
ADD A 5 ¢SHIFT LEFT 
MOV REGrA 3#PUT BACK 
ENDM 


The byte is first moved to the accumulator. The next step is to add the 
accumulator to itself. This doubling operation performs the needed shift 
into carry. Then the result is returned to the original register. The value in 
register C can be doubled by inserting the macro call 


SLA c 


This macro must be used with caution, since the accumulator will be 
changed during use. But the byte originally in the accumulator cannot be 
saved with a PUSH PSW instruction. The problem is that the subsequent 
POP PSW command will overlay the flag register, so that the carry result of 
the shift will be lost. One solution is to save the accumulator in memory. 


SLA MACRO REG sSHIFT LEFT ARITH 
STA SAVE ssSAVE A 
MOV AsREG ¢9GET BYTE 
AbD A 9¢SHIFT LEFT 
MOV REGrA $s$PUT BACK 
LDA SAVE s#RESTORE A 


ENDM 
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THE REPEAT MACROS 


There are times when several lines of identical or nearly identical lines of 
code are needed. Three repeat macros, REPT, IRP, and IRPC are provided 
for this purpose. The repeat macros differ from the regular macros in that 
they are placed directly into the source program where they are needed. The 
macro definition is the macro call. In the simplest form, an instruction or 
group of instructions can be replicated. The expression 


REPT 4 
RAR 
ENDM 


will generate the four lines 


RAR 
RAR 
RAR 
RAR 


By using the SET directive, this operation can become more versatile. The 
SET instruction is like an EQU except that the value can be redefined. 
The lines 


ADDR SET 8000H 
REPT 4 

ADDR SET ADDR+3 
DW ADDR 
ENDM 


will generate the code corresponding to 


DW 8003H 
DW 8006H 
DW 8009H 
DW 800CH 


Such a series could refer to jump vectors that are spaced three bytes apart. 

The repeat macro, combined with the conditional-assembly directive, 
can generate the required number of nulls after a carriage-return, line-feed 
pair. This will give the printer time to return to the left margin. Some 
printers need no nulls, whereas others may need as many as six or seven. The 
source code could be 


5 
§ OUTPUT TO LIST DEVICE 


, 
LOUT?: IN LSTAT 
ANI LOMSK 
JZ LOUT 
MOV ArC 5GET DATA 


ouT LDATA sSEND BYTE 
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IF NULLS > 0 
ANI 7FH sREMOVE PARITY 
CPI CR sCARRIAGE RETURN? 
RNZ 3NO 
MVI Cr0 sGET A NULL 

g 
REPT NULLS sHOW MANY? 
CALL LOUT sSEND NULL 
ENDM sREPEAT MACRO 
ENDIF #NULLS 

, 
RET 


The first part is a typical output subroutine. A call is made with the byte in 
register C. When the output device is ready, the byte is moved from the C 
register to the accumulator. It is then sent to the printer. If no nulls are 
required, then the passage from 


IF NULLS > 0 


to 
ENDIF 


is not assembled. On the other hand, if nulls are required, then this passage 
is assembled. If four nulls are needed, then the assembler will generate four 
lines of 


CALL LOUT sSEND NULL 


The list output routine calls itself to produce the required nulls. The identi- 
fier called NULLS must be previously set to the necessary number of nulls. 

There are two other repeat macros called IRP and IRPC. A set of one- 
character message routines can be generated by using the indefinite repeat 
macro IRPC. This example will introduce something called a programming 
trick. Some people think that it is a horrible example of programming. 
Others think it is very clever. Its purpose is to save two bytes of instruction 
each time it is used. In addition, less branching is required. 

Suppose that we need five different message routines that each produce 
a single character. The instructions might look like 


CHARC: MVI Ar’C’ 
JMP OUTT 
CHARM: MVI Ay ’M’ 
JMP OUTT 
CHARR: MVI Ar’R’ 
JMP OUTT 
CHAR?$ MMVI Ar’?! 
JMF OUTT 
CHARS: MVI Ar’$’ 
JMP OUTT 


oo ¢ © 


OQUTT? <output routine> 
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If the B and C registers are not in use, we can shorten the above passage by 
replacing each line containing the instruction JMP OUTT with a line of DB1. 


CHARC? MVI As’C’ 
DB 1 
CHARM: MVI Ar ’M’ 
DB 1 
CHARR: MVI Ar’R’ 
DB 1 
CHAR?? MVI Ar’?’ 
DB 1 
CHARS! MVI Ay’$/ 
y 


OUTT?: 6 6 


Let’s see how this works. Suppose that a branch is made to the label 
CHARC. The accumulator is loaded with an ASCII letter C. The next byte, 
a DB 1, looks like the start of an LXI B instruction. The following two 
bytes, corresponding to the MVI A,'M’ instruction, will be interpreted as the 
argument for the LXI instruction. That is, they will be considered as data. 
The same will hold for the other occurrences of DB 1. By this means, we 
have effectively shortened the code. We no longer need the JMP statements. 
Caution: a disassembler is not likely to interpret this passage correctly. It 
looks like there are labels pointing into the middle of the LXI instructions. 
Notice that the second version has subroutine OUTT positioned directly 
under the CHAR$ routine, so that no JMP instruction is needed at this 
point. 

The second version can be easily generated with the IRPC macro. Only 
five lines are needed in the source program. 


IRPC Xe» CMPR?PS 

DB 1 sFAKE LXI B 
CHAR&X? MVI Ar’ 8X?’ 

ENDM 


The five different message routines are all generated with this single macro. 
One replication is made for each character of the second argument to IRPC. 


PRINTING STRINGS WITH MACROS 


Suppose that we want to send messages to the console from various points 
of a program. We could write a subroutine called SENDM for this purpose. 


SENDM: LDAX D sGET CHAR 
ORA A § ZERO? 
RZ sYES 
INX D sPOINTER 
MOV CrA 
CALL OUTT 3SENT 


JMP SENDIM sNEXT 
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The address of the message is loaded into the DE register and subroutine 
SENDM is called. 


LXI D»MESS1 
CALL SENDM 


Subroutine SENDM prints a message by sending each character to the output 
subroutine OUTT. When a binary zero, used to indicate the end of the mes- 
sage, is found, SENDM returns to the calling program. 

We can simplify the sending of messages by using a macro called PRINT. 
At each point we write 


PRINT <CHECKSUM ERROR> 
PRINT <END OF FILE> 


° + e 
PRINT <OUTPUT TO LIST?> 


The macro called PRINT will generate the message given in the argument. 
The message is enclosed in angle brackets because the blanks are part of the 
argument. 

If subroutine SENDM were placed into the macro body, then one copy 
of SENDM would be inserted for each occurrence of the PRINT statement. 
But we don’t need more than one copy of SENDM. On the other hand, if 
we don’t include SENDM in the macro, there may not be any copies at all. 
What we need is a mechanism for inserting one, and only one, copy of 
SENDM regardless of how many times we give the PRINT command. 

The solution is to write a double macro—one nested inside the other. 
Both macros will be given the same name. Subroutine SENDM will be part 
of the outer macro which will be expanded only once. The layout looks 
like this. 


PRINT MACRO <messase> #sOUTER MACRO 
Cdefine SENDM] 

PRINT HACRO <messase> INNER MACRO 
Esend message] 
ENDM sINNER MACRO 


ENDM SOUTER MACRO 


The source program in Listing 5.1 demonstrates this technique. The outer 
macro PRINT has the argument ?TEXT, used for the first call to the macro. 
Subroutine SENDM is generated at this time. Additional macro calls to 
PRINT utilize the inner macro which has the argument ?7TEXT2. Subrou- 
tine SENDM is not generated on these subsequent calls. 


Listing 5.1. Source listing for 8 macro 
demonstration rrogram. 
, 
PRINT MACRO ?TEXT 
LOCAL AROUND 


- 


JMP AROUND +SENDM 
SUBROUTINE TO SEND A STRING TO 


DyE IS STRING POINTER. 


Cf} er er er er er 


ENDM: LIDIAX ob §GET CHAR 
ORA A 9 ZERO? 
RZ *YES 
INX D sPOINTER 
MOV CrA 
CALL OUTT §SENT 
JMP SENDM 9NEXT 

, 

AROUND? 


, 

¢ REDEFINE THE MACRO 

, 

PRINT MACRO ?TEXT2 
LOCAL MESG»CONT 


FUSH D sSAVE DvE 
LXI DeMESG #POINT 
CALL SENDIM 
FOP it) sRESTORE 
JMP CONT sSKIPF MESSAGE 
; 
MESG: 
DB CRoLFs ’&?TEXT2’ 90 
; 
CONT? ENDM SINNER MACRO 
FRINT LPTEXT> 
ENDM sOUTER MACRO 
, 
CSTAT EQU 10H sCONSOLE STATUS 
CDATA EQU CSTAT+1 sCONSOLE [IATA 
CR EQU 13 sCARRIAGE RETURN 
LF EQU 10 sLINE FEED 
, 
ORG 100H 
START? 


PRINT <CHECKSUM ERROR. > 
, 
PRINT <END OF FILE.*> 
, 
PRINT <OUTFUT TO LIST?= 
JMF 0 sRETURN TO CP/M 


SEND CHARACTER IN C TO THE CONSOLE 


‘<> a> <=> 


THE CONSOLE. BINARY ZERO AT STRING END. 
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OUTT: IN 
ANI 
JZ 
MOV 
OUT 
RET 


= 


END 


CSTAT 


2 


OUTT 
A»C 
CLIIATA 


Subroutine SENDM is coded into the main flow of the program, that 
is, it is an inline routine. It is therefore necessary to jump around SENDM. 
Additionally, there must be a branch around each of the messages, since they 
too are coded inline. Labels for the required branches are uniquely gener- 
ated in the macro by declaring the corresponding labels as LOCAL. The 
resulting assembly listing is given in Listing 5.2. The assembler places plus 
symbols between the address and the generated code of the assembly listing 
to designate those lines that were generated by macros. Thus, lines that 
contain plus symbols were not present in the original source listing. 


Listing 5.2, 


Assembly listing for 32 macro 


demonstration rrogram. 


y 
PRINT MACRO ?TEXT 
LOCAL AROUND 


JMP AROUND #SENDIM 


SUBROUTINE TO SEND A STRING TO 
THE CONSOLE. BINARY ZERO AT STRING END. 
DryE IS STRING POINTER. 


WD «> > «> 


ENDM: LJIAX 0 sGET CHAR 
ORA A 5 ZERO? 
RZ *YES 
INX 0 s+POINTER 
MOV CrA 
CALL OUTT ¥SENT 
JSMF SENDIDOM yNEXT 

, 

AROUND? 


REDEFINE THE MACRO 


«> «> «> 


RINT MACRO ?PTEXT2 
LOCAL MESG»CONT 


PUSH ft) ISAVE DvE 

LXI DyMESG +¢POINT 

CALL SENIM 

POP D +RESTORE 

JMP CONT ySKIP MESSAGE 


DB CRoL Fy’ &?TEXT2’ 90 


0010 
0011 
ooor 
QOOOA 


ion wou 
oa 
a 


¥ 
0100 ORG 


START? 


O100+C30E01 
0103+1A 
0104+B7 
0105+C8 
0106413 
0O107+4F 
0108+C06501 
0O10B+C30301 
O10E+DS 
O10OF 4111901 
0112+CB0301 
0115+D1 
0116+C32B01 
0119+01D0A434845 


y 


012B+05 
01204113601 
012F+CD0301 
0132+D1 
0133+C34501 
0136+0D0A454E44 


y 


0145+DS 
01464115001 
01494+CD0301 
014C+D1 
014D+C36201 
0150+0D0A4F 5554 
0162 C30000 


© «> «> we 


0165 DB10 UTT: 
0167 E602 

0169 CA6501 

016C 79 

016D D311 


O16F C9 


oo 


0170 


SENIM: 


ENDM 
PRINT 
ENDM 


EQu 
EQu 
EQU 
EQU 


100H 


FRINT 
JMF 
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+ INNER MACRO 
LPTEXT> 
sOUTER MACRO 


10H sCONSOLE STATUS 
CSTAT+1 sCONSOLE DATA 

13 sCARRIAGE RETURN 
10 sLINE FEED 


CHECKSUM ERROR. > 


??0001 +>SENDIM 

a] sGET CHAR 

A *ZERO? 
*YES 

D sPOINTER 

CrA 

OUTT 9SENT 

SENDM sNEXT 

iH) sSAVE DrE 

Ty??0002 sFOINT 

SENDM 

D sRESTORE 

770003 #s#SKIP MESSAGE 


CRyLF» ‘CHECKSUM ERROR. ’ +0 


“END OF FILE.> 


D sSAVE DvE 
De??0004 xPOINT 
SENDM 

vt sRESTORE 
770005 #SKIF MESSAGE 


CRyLF»’END OF FILE.’ 10 


“OUTPUT TO LIST?> 


QD sSAVE DvE 
De??0006 sPOINT 
SENDM 

ty #RESTORE 
270007 $¢SKIF MESSAGE 


CReLF»’OUTFUT TO LIST?’ »0 
¢) sRETURN TO CF/M 


SEND CHARACTER IN C TO THE CONSOLE 


CSTAT 
2 
OUTT 
ArC 
CLATA 
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If you are familiar with the operation of your assembler, type up the 
demonstration program and try it out. Branch to the beginning and three 
messages will appear at the console. 


Checksum error 
End of file 
Output to list? 


Assembler operation will be considered in the next chapter. 

By constructing increasingly complicated macros, it is possible to 
develop some of the structure that is characteristic of higher-level languages 
such as Pascal. The common loop constructions 


REPEAT 


oJ ° ° 


UNTIL <condition true> 


and 


LooP 


° ° a7 
EXITIF <condition true> 
° ° ° 


ENDLOOP 


can be realized with macros called REPEAT, UNTIL, and so on. The argu- 
ments to UNTIL and EXITIF will consist of three terms. The first and third 
will be numeric values. The middle term will represent a logical operation 
such as EQUALS or LESS THAN. The spelling of the logical operators in 
this case will have to be unusual, since the normal spellings 


EQ 
LT 
GE 


are already utilized by the macro assembler. Macros for all of the common 
structures are available commercially. Also, source programs for structured 
macros of this type may be given in the instruction manual for your macro 
assembler. 


CHAPTER SIX 


Development of 
a System Monitor 


The best way to learn assembly language programming is to actually do it. 
Consequently, in this chapter you will develop a small but very powerful 
utility program called a monitor. There are many useful things that can be 
done with the monitor. There is a command to examine memory and another 
to change it. Other commands deal with memory blocks. These allow you to 
move a block from one location to another. Some of the features will dupli- 
cate those found in other programs, but other features, such as a search 
routine and a memory test routine, will be unique. 

You will not program the entire monitor at one time. Instead, you will 
start with just the bare essentials. You will check the monitor after each 
major change to ensure that the new features have been added correctly. 
With this so-called top-down method, any error that develops is likely to be 
found in the most recently added instructions. As new features are incorpo- 
rated, the monitor will increase in size until it reaches 1K bytes. This is a 
size that can be easily programmed into a single ROM. The monitor will 
then be immediately available as soon as the computer is turned on. 

An editor and an assembler are required for the development of the 
monitor. In addition, a debugger will be helpful if you have problems along 
the way. Each phase of the development will require the same sequence of 
steps. 


1. Generate an assembly language source file with the editor. 

2. Assemble the source program to produce an object file. 

3. Compare the hex code from your assembly listing to the listing 
given in this chapter. 

. Load the object program into memory. 

. Branch to the monitor and try it out. 
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The assembly listings given in this chapter are written with 8080 mne- 
monics. You can use an 8080 assembler for these programs whether you 
have an 8080 or a Z-80 CPU. The resulting code will run on both an 8080 
and a Z-80 CPU. If you have only a Z-80 assembler, you will have to change 
the mnemonics. The cross-reference between the 8080 and Z-80 mnemonics, 
given in Appendix G, can be used to find the corresponding instructions. 
Alternately, you can define the 8080 mnemonics as macros. 


PROGRAM DEVELOPMENT DETAILS 


This section describes the details of program development. Skip to the next 
section if you are familiar with the operation of your editor and assembler. 
An editor is needed to create and alter the assembly language source file. If 
you have CP/M, you will have an editor called ED. Other editors, such as 
ED-80, EDIT80, and Word-Master, are separately available. 

The session begins by giving the name of the editor and the name of the 
source program. The following discussion assumes that you have CP/M. If 
you have some other operating system, the approach will be similar, but the 
details may differ. Put the CP/M system diskette in drive A and a working 
diskette in drive B if you have more than one drive. Go to drive B with the 
command 


A>Bi 
The response will be 


B> 


Type the name of the editor followed by the name of the monitor source 
program. The command line might look like this. 


B>ASED MON1L.ASM 


for the first version. The digit 1 in the filename refers to the version number. 
The file type is ASM for the Digital Research assemblers ASM and MAC. 
The file type should be chosen as MAC, however, if the Microsoft assembler 
is used. 

As you type the source program, be careful to include only the instruc- 
tions and the comments shown in Listing 6.1A. Do not type the resulting 
hex code that is also given at the beginning of each line. For example, the 
line that defines the parameter TOP, on the first page of the listing, should 
be typed as 


TOP EQU 24 sMEMORY TOP, K BYTES 
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rather than as: 


0018 = TOP Eau 24 sMEMORY TOPs K BYTES 


Type a Control-I or tab to automatically generate the blank spaces between 
symbols. 

Most of the assembly language symbols have five or fewer characters. 
This is acceptable to many assemblers. However, if your assembler only 
allows names to have a maximum of five characters, then several symbols 
will have to be shortened. The TITLE directive, on the first line, is another 
potential problem. The CP/M version is shown. The apostrophes should be 
removed if the Microsoft assembler is utilized. If the TITLE directive is not 
available on your assembler, place a semicolon at the beginning of this first 
line to convert it to a comment. 


VERSION 1: THE INPUT AND OUTPUT ROUTINES 


Refer to Listing 6.1A. This version will contain only the input and output 
routines. Generate an assembler source file with the system editor. The 
following variables will have to be tailored to your particular system. 


TOP (top of usable memory, decimal K) 
HOME (where to return when done) 
CSTAT (console input status address) 
CDATA (console input data address) 


CSTATO (console output status address) 
CDATAO (console output data address) 
INMSK (input-ready mask) 

OMSK (output-ready mask) 

BACKUP (console backspace character) 


Normally, CSTATO will be the same as CSTAT, and CDATAO will be the 
same as CDATA. But if your console input address is different from your 
console output address, then each can be separately defined. Furthermore, 
the address of CDATA will typically have a value one larger or smaller than 
that of CSTAT. 
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Listing 6.1A. 


S A 
S ao 
S$ fo] 
fo] °o 
H Hou 


S 

So 

rat 

het 
Huu H HH HOW 


is 
N 
> 
W 
Huu a 


S 
So 
N 
n 
Hou UHHH HHH HaHa 


9800 C34A5S8 
9803 C35358 


5806 CD1658 
5809 CA0658 


The besinnina of a system monitor. 


TITLE ‘8080 sustem monitors ver 1’ 


gy 
5 (Put today’s date here) 


TOF EQU 24 sMEMORY TOF, K BYTES 
ORGIN Eau (TOF-2)*1024 sPROGRAM START 
’ 
ORG ORGIN 
, 
5 
HOME EQU 0 sABORT (VER 1-2) 
3 HOME EQU ORGIN *ABORT ADDRESS 
VERS EQU “1’ sVERSION NUMBER 
STACK EQu ORGIN-60H 
CSTAT EQU 10H sCONSOLE STATUS 
CLIATA EQU CSTAT+1 sCONSOLE DNATA 
CSTATO EQU CSTAT sCON OUT STATUS 
CDATAO EQU CSTATO+1 sOUT DATA 
INMSK EQU 1 yINFUT MASK 
OMSK EQU 2 sOUTFUT MASK 
5 
FORTN EQu STACK 93 BYTES I/0 
IBUFF EQU STACK+3 *+BUFFER POINTER 
IBUFC EQU IBUFF+2 *BUFFER COUNT 
IBUFF EQU IBUFF+3 *INFUT BUFFER 
’ 
CTRH EQU 8 9H BACKSFACE 
TAB EQU 9 as 
CTRQ EQU 17 ee 
CTRS EQu 19 8S 
CTRX EQU 24 §~X» ABORT 
BACKUP EQU CTRH *BACKUP CHAR 
DEL EQU 127 sRUBOUT 
ESC EQU 27 sESCAFE 
AFOS EQU (39-'0’) AND OFFH 
CR EQU 13 sCARRIAGE RET 
LF EQU 10 sLINE FEED 
INC EQU ODBH 9IN OF CODE 
OUTC EQU OD3H sOUT OF CODE 
RETC Eau OC9H sRET OF CODE 
, 
START? 

JMF COLD sCOLD START 
RESTRT? JMP WARM sWARM START 


, 
¢ CONSOLE INPUT ROUTINE 
; 


INPFUTT: CALL INSTAT s#CHECK STATUS 
JZ INFUTT sNOT READY xxx 
INFUT2: IN CDATA sGET BYTE 
ANI DEL 
CPI CTRX sABORT? 
JZ HOME sYES 
RET 


GET CONSOLE-INFUT STATUS 


“o> “a> “ee 


i 


5816 
5818 
S81A 


S81B 
581C 
S81F 
5822 
5825 
5827 


582A 
582 
S82F 
5832 


5835 
5837 
5839 
583C 
5830 
S83F 


3840 
5842 
5847 
5849 


584A 
584D 
5850 


5853 
5856 
5857 
585A 
S85t 
5860 
5862 


5865 
5867 


586A 
S86C 


S86F 
5871 


5874 


DB10 
E601 
c9 


FS 
C01658 
CA3558 
Cbpocss 
FE13 
C21C58 


C0658 
FE11 

C22A58 
C31C58 


DB10 
E602 
CA1C58 


31A057 
114058 
CDE258 


215358 
ES 
CUB658 
cn7758 
cpccss 
FE44 
CA5358 


FE43 
CAS358 


FE47 
CAS5358 


FE4C 
CAS358 


C35358 
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INSTAT: IN CSTAT 
ANI INMSK 
RET 


CONSOLE OUTPUT ROUTINE 


’ 
OUTT: FUSH FSW 


OUT23 CALL INSTAT s¢INFUT? 
JZ OUT4 ¢NO XXX 
CALL INFUT2 #s#GET INPUT 
CFI CTRS sFREEZE? 
ANZ OUT2 . ¥NO 


Oe w ~~ 


FREEZE OUTFUT UNTIL “Q OR “xX 


UT33 CALL INFUTT $s INFUT? 
CFI CTRQ sRESUME? 
JNZ OouT3 9NO 
JMF OUT2 
, 
OUT4: IN CSTATO #CHECK STATUS 
ANI OMSK 
JZ OUT2 s>NOT READY xxx 
POF PSW 
OUT CLIATAO +¢SEND DATA 
RET 
, 
SIGNON: DDE CRyLF 
IB ‘ Ver “’ 
DW VERS 
DB 0 


xrcwe «w 


- > od 


> 


CONTINUATION OF COLD) START 


OLIN: LXI SP»ySTACK 
LXI DySIGNON sMESSAGE 
CALL SENDIIM sSEND IT 


WARM-START ENTRY 


ARM? LXI H»WARM sRETURN HERE 
FUSH H 
CALL CRLF sNEW LINE 
CALL INFLN »CONSOLE LINE 
CALL GETCH sGET CHAR 
CFI “Th” > DUMF 
JZ WARM s(VER 1) 
JZ DUMP sHEX/ASCII (2) 
CFI °C’ sCALL 
JZ WARM 9(VER 1-2) 
JZ CALLS sSUBROUTINE (3) 
CFI ‘GC’ +GO 
JZ WARM s(VER 1-2) 
JZ GO sSOMEWHERE (3) 
CFI “Le sLOAD 
JZ WARM s(VER 1-3) 
JZ LOAD sINTO MEMORY (4) 


JMP WARM +TRY AGAIN 
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¢ INPUT A LINE FROM CONSOLE AND FUT IT 
’ INTO THE BUFFER. CARRIAGE RETURN ENDS 
§ THE LINE. RUBOUT OR “H CORRECTS LAST 
§ LAST ENTRY. CONTROL-X RESTARTS LINE. 
» OTHER CONTROL CHARACTERS ARE IGNORED 
’ 
I 


5877 SESE NFLNi MMVI Ay ‘>? > PROMPT 
9879 CD1B58 CALL OUTT 
S87C 21A657 INPL23  LXI Hes IBUFF sBUFFER ADDR 
S87F 22A357 SHLD IBUFF sSAVE FOINTER 
5882 OE00 MVI Cr0 > COUNT 
5884 CD0658 INPLI: CALL INFUTT #CONSOLE CHAK 
5887 FE20 CFI et > CONTROL? 
5889 DAA8S8 JC INPLC sYES 
S88C FE7F CPI DEL *DELETE 
S88E CACOS8 JZ INFLB ‘YES 
5891 FESB CFI ‘Z’ +1 SUPPER CASE? 
5893 DA9858 JC INPL3 sYES 
5896 E65F ANI SFH sMAKE UPPER 
5898 77 INPL33 MOV MrA sINTO BUFFER 
5899 3E20 MVI Ar32 sBUFFER SIZE 
S89B B9 CMP C sFULL? 
S89C CA8458 JZ INPLI ¥YES» LOOF 
S89F 7E MOV AM sGET CHAR 
SBAO 23 INX H ¢INCR FOINTER 
S8A1 OC INK Cc sAND COUNT 
S8A2 CD1ES8 INPLE$ CALL OUTT *>SHOW CHAR 
S8AS C38458 JMP INPLI sNEXT CHAR 

, 

’ FROCESS CONTROL CHARACTER 

gy 
S8A8 FEOS8 INFLC? CPI CTRH 9H? 
S8AA CACOS8 JZ INPLB 9YES 
S8AD FEOD CFI CK sRETURN? 
S8AF C28458 JNZ INFLT 9NO»x IGNORE 

’ 

> END OF INPUT LINE 

’ 
S8B2 79 MOV ArC + COUNT 
S8B3 32A557 STA IBUFC 9 SAVE 

’ 

§ CARRIAGE-RETURN» LINE-FEED ROUTINE 

, 
S8B6 3EOD CRLF MVI A»CR 
58B8 CD1B58 CALL OUTT sSEND CR 
S8BB 3EOA MVI AyLF 
S8BD C31B58 JMP OUTT sSEND LF 

y 

’ DELETE PRIOR CHARACTER IF ANY 

, 
S8CO 79 INPLE? MOV AsC sCHAR COUNT 
58C1 B7 ORA A 9 ZERO? 
S8C2 CA8458 JZ INPLI 9YES 
S8C5 2B DCX H sBACK FOINTER 
58cé OD DCR Cc sAND COUNT 
5S8C7 3E08 MVI A»BACKUP *#CHARACTER 
98C9 C3A258 JMP INPLE sSEND 


GET A CHARACTER FROM CONSOLE BUFFER 
SET CARRY IF EMPTY 


a 


> @> ~e> 
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a 


, 
S8scC ES GETCH: FUSH H sSAVE REGS 
S8CD 2AA357 LHL IBUFP sGET FOINTER 
S8D0 3AASS7 LDA IBUFC sAND COUNT 
S8D3 D601 SUI 1 sDECR WITH CARRY 
9805 DAEOSS8 Jc GETC4 *NO MORE CHAR 
58D8 32A557 STA IBUFC sSAVE NEW COUNT 
S8DB 7E MOV ArM *GET CHARACTER 
S8DC 23 INX H sINCR POINTER 
S8DD 22A357 SHLD IBUFP sAND SAVE 
S8EO E1 GETC4: FOP H sRESTORE REGS 
S8E1 C9 RET 


SEND ASCII MESSAGE UNTIL BINARY ZERO 
IS FOUND. POINTER IS DvE 


CH) -e> > a> > 


S8E2 1A ENDM: LDAX 0 sGET BYTE 
S8E3 87 ORA A 9 ZERO? 
S8E4 C8 RZ sYES» DONE 
S8ES CD1BS8 CALL OUTT sSEND IT 
S8E8 13 INX if) sFOINTER 
S8E9 C3E258 JMP SENIIM 9NEXT 

, 
S8EC END 


If you don’t know the addresses of the console status and data registers 
and you are using the CP/M operating system, there is another approach you 
can take. You can use the I/O routines in the CP/M BIOS. The disadvantage 
of this approach is that CP/M must always be in place whenever the monitor 
is used. The BIOS entry address is given at memory address 1. The console 
status, input and output addresses are obtained by adding, respectively, 3, 6, 
and 9 to this address. The following I/O routines in Listing 6.1B can be sub- 
stituted for the subroutines in Listing 6.1A starting with the label INPUTT 
and ending with the label OUT2. If this version is utilized, the addresses in 
the following sections will not agree with your assembly listings. 


Listing 6.1B. Alternate I/0 routines usind CP/M BIOS. 


¢ CONSOLE INPUT ROUTINE USING CF/M BIOS 


g 

INFPUTT? 
5806 ES INPUT2: FUSH H sSAVE REGISTERS 
5807 DS FUSH ft 
5808 CS FUSH B 
5809 211558 LXI Hy INS sRETURN ADDRESS 
S8oc ES FUSH H sPUT ON STACK 
S80D 2A0100 LHLD 1 sBIOS WARM START 
5810 110600 LXI [vd sOFFSET TO INFUT 
5813 19 DAD ob sADD IN 
5814 E9 FCHL sCALL BIOS 
9815 Ci INS? FOP EB sRESTORE REGISTERS 
5816 D1 FOP D 
5817 E1 FOP H 
5818 FE18 CPI CTRX yABORT? 
S81A CA00S8 JZ START sYES 


5810 C9 RET 


92 8080/Z-80 ASSEMBLY LANGUAGE 


SB1E 
S81F 
9820 
9821 
5824 
5825 
9828 
582B 
582C 
5820 
582E 
582F 
5830 
5831 


9832 
5833 
5836 
5839 
S83C 
S83E 
5841 
5844 
9846 
5849 


584C 
584D 
S84E 
S84F 
5850 
5851 
5852 
5855 
5856 
5859 
S85c 
5850 
S85E 
S85F 
5860 
5861 
5862 


ES 
DS 
CS 
212058 
ES 
2A0100 
110300 
19 


FS 
CD1E58 
CA4C58 
CU0658 
FE13 
C23358 
cno0é658 
FE11 
C24158 


215E58 
ES 
2A0100 
110900 
19 
E9 
Fil 
C1 
D1 
El 
c9 


¢ GET CONSOLE-INFUT STATUS USING CF/M 
, 


INSTAT? 


STS: 


<|> <> <a> 


OUTT: 
OUT23 


OUT3: 


OUT4: 


OUTS: 


PUSH 
PUSH 
PUSH 
LXI 
PUSH 
LHLD 
LXI 
pap 
PCHL 
POF 
POP 
POP 
ORA 
RET 


FUSH 
CALL 
JZ 
CALL 
CFI 
JNZ 
CALL 
CFI 
JNZ 
JMP 


FOP 
FUSH 
PUSH 
PUSH 
MOV 
PUSH 
LXI 
PUSH 
LHLD 
LXI 
DAL 
PCHL 
POP 
FOF 
FOF 
FOF 
RET 


pPDrIMom 


FSW 
INSTAT 
OUT4 
INFUT2 
CTRS 
OUT2 
INPUTT 
CTRQ 
OUTS 
OUT2 


PSW 
H 
0 
B 
CA 
FSW 


sSAVE REGISTERS 


sRETURN ALDRESS 
sFUT ON STACK 
*BIOS ENTRY 
sOFFSET TO STATUS 
sADD TO ADDR 

sCALL BIOS 
sRESTORE REGISTERS 


CONSOLE OUTFUT ROUTINE USING CF/M BIOS 


*SAVE BYTE 
sINFUT? 
9NO 

sGET INPUT 
sFREEZE? 
¥NO 

+ INPUT? 
sRESUME? 
>NO 


*GET BYTE 
*SAVE REGISTERS 


*MOVE BYTE 


*RETURN ADDRESS 
sPUT ON STACK 
*RIOS ENTRY 
sOFFSET TO OUTFUT 
sADL TOGETHER 
*CALL BIOS 
sRESTORE REGISTERS 


Some of the constants such as PORTN will not be used at this time. 
However, their inclusion now will simplify things later. There are four 
occurrences of the dummy instruction 


JZ 


WARM 
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following the label WARM. Each is followed by an instruction that will be 
needed later. These latter instructions are preceded by a semicolon so that 
they will be treated as comments by the assembler. 

There are some other matters that may need to be considered. One has 
to do with the sense of the input and output ready flags. There are three 
conditional jump instructions based on console-ready flags that display a 
logical 1 (active high) when ready. If your flags are inverted, that is, they 
present a logic zero when ready, then the three JZ commands must be 
changed to JNZ commands. These lines, indicated by three stars in the 
listing below, should be changed to 


INPUTT? CALL INSTAT §CHECK STATUS 


JNZ INPUTT #NOT READY &xx 
OUT2: CALL INSTAT $#INPUT? 
JNZ OUT4 jNO —1&KK 
o ° ° 
OUT4: IN CSTAT sCHECK STATUS 
ANI ONSK 
JNZ OUT2 ¢NOT READY xxx 


The routine that corrects keyboard errors is programmed for a video 
console. If you have a console printer instead, change the backspace char- 
acter to a slash. 


BACKUP EQU a ad sCORRECTION 


This will print a slash when an error is corrected. Otherwise the printer will 
back up during error correction, overstriking the old character with the new. 
You may also need to add some nulls after each carriage return. The prob- 
lem here will be evidenced by missing characters at the beginning of each 
line. The solution is to place additional instructions in the subroutine called 
CRLF. Replace the last statement in this routine with the following. 


CALL OUTT sSEND LINE FEED 
XRA A sGET A ZERO 
CALL OUTT sSEND NULL 

CALL OUuTT 3ANID ANOTHER 

7 6 6 (one line for each null) 
JMP OUTT sLAST NULL 


The rest of the program can be copied directly as it is. The abort com- 
mand is a control-X. Initially, the abort address of HOME will be needed to 
leave the new monitor and return to your regular system. We will change 
this in version 3 when we will add a routine for branching to any memory 
address. 

If you have a TRS-80 Model I, you won’t have a control key. There- 
fore, you will have to change several of the commands shown in the listing. 
The original commands follow. 
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CTRH (Control-H) 
TAB (Control-I) 
CTRQ (Control-@) 
CTRS (Control-S) 
CTRX (Control-X) 
DEL (DEL/RUB) 

ESC (Escare) 


After you have finished typing the program, exit from the editor and 
assemble the source program with the assembler. The command line might be 


B>ASASM MONI 


or 


B>AtMAC MON1 


for the Digital Research assemblers. These two assemblers will produce two 
files. 


MON1.ASM (assembly listing) 
MON1.HEX (hex code) 


In addition, MAC will produce a symbol table 


MON1.SYM (symbol table) 


Inspect the hex code given in the assembly listing to see that it matches 
the corresponding instructions given in this chapter. These 8080 listings have 
all been generated with the Digital Research assembler MAC. This assembler 
displays the hex code for 16-bit operands in the usual reverse order. The 
low-order byte appears first followed by the high-order byte. Thus: 


CD1i#58 means CALL 581B = and 
C38458 means JIMP 5884 


By contrast, the assembly listing produced by the Microsoft assembler 
reverses the usual order of the two bytes. The high-order byte is given first; 
this is followed by the low-order byte. In this case, the listing 


CD 581B means CALL S81K = and 
C3 5884 means JMP 5884 


The next step is to load the hex program into memory using the debug- 
ger. The CP/M command would be 


B>AS DDT MON1.HEX or 
B>A?SID MON1.HEX 


DEVELOPMENT OF A SYSTEM MONITOR 95 


Now branch to the beginning of the monitor using the debugger G command. 
G5800 


The first thing that the monitor will do is display the version number on the 
first line and a prompt symbol of > underneath it. 

Try out this first version by typing a series of letters and numbers. Each 
character that is typed should appear (echo) on the console. Try the correc- 
tion keys. Typing either a control-H (backspace) or the RUB/DEL key 
should back up the cursor on a video terminal. Type a carriage return. The 
prompt symbol should appear at the beginning of the next line. If all of the 
features are working properly, type a control-X to return to your regular 
system. If something appears to be wrong, carefully compare your assembly 
listing with the one given in Listing 6.1A. Don’t proceed to the next version 
until the current one is working. 


VERSION 2: A MEMORY DISPLAY 


A provision for examining the contents of memory will now be added. This 
routine is called a memory dump, or dump for short; it displays the contents 
of memory in both hex and ASCII notation. The dump feature is initiated 
with a command of D followed by the address limits in hexadecimal. For 
example, the statement 


>T1100 18F 


will dump memory from address 100 to 18F hex. The first address (100 
in this case) must immediately follow the letter D. A space is typed and 
then the second address (18F in this case) is entered. Leading zeros are 
unnecessary. 

Each line will display 16 memory locations. The hexadecimal address 
of the first location will appear at the beginning of the line. Then the hexa- 
decimal representation of the contents will follow, two characters per byte. 
These are arranged in four groups of four bytes. The ASCII representations 
of the data will be given at the end of the line if printable. Otherwise, a 
period is given. A dump of the first line of the monitor might look like this. 


>DS800 S80F (your command) 
5800 C35C58C3 46558CD16 S8CA0658 DBLIES7F «\Xs@Xe Xe eXeves 


Use your system editor to make the necessary alterations and additions 
to version 1. First, change the version number at the beginning of the 
program. 


VERS EQU “2° sVERSION NUMBER 
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Next, locate the instruction 
JZ DUMP 


that follows the label WARM. Remove the semicolon at the beginning of 
this line. Also delete the line just before it that jumps to WARM. The region 
should now look like this. 


CALL GETCH 
CPI ‘D’ > DUMP? 
JZ DUMP 


° ° ° . e ° 


The remaining instructions, shown in Listing 6.2, will be placed at the 
end of version 1, just preceding the END statement. It might be easier to 
delete the END statement, type in the new code, and then add a new END 
statement. The END statement is usually optional, anyway. One of the sub- 
routines (READHL) will translate the dump limits from ASCII-encoded 
hexadecimal into binary. One routine gets both the start and the stop address 
(using READHL) then checks to see that the second address is larger than 
the first. If the second address is smaller than the first, then the task will be 
aborted. Subroutine OUTHEX will convert the binary data already in 
memory into ASCII-coded hex for output to the console. Subroutine TSTOP 
is used to determine when to terminate the dump process. Finally, an error 
routine (ERROR) will be needed in case an invalid character is entered by 
the user. 


Listind 6.2+ Memory disrlay 


> DUMF MEMORY IN HEXADECIMAL AND ASCII 
; 
S8EC Cri2p59 DUMP $ CALL RDHLDE sRANGE 


S8EF CD8359 DUMP2: CALL CRHL 5NEW LINE 
S8F2 4E DUMP3: MOV CoM *GET BYTE 
S8F3 CD9359 CALL OUTHX +PRINT 

S8F6 23 INX H sPOINTER 
S8F7 70D MOV ArL 

S8F8 E6OF ANI OFH sLINE END? 
S8FA CAOSS9 JZ DUMP 4 sYES»y ASCII 
S8FD E603 ANI 3 9 SPACE 

S8FF CC8E5S9 CZ OUTSP + 4 BYTES 
5902 C3F258 JMP DUMPS #NEXT HEX 
5905 CD8ES9 DUMP4: CALL OUTSP 

5908 DS FUSH D 

5909 LIF OFF LXxI Dy-10H s¢RESET LINE 
S90C 19 DAD t) 

S90D Di POP DB 

S90E CD1IDS9 DUMPS: CALL FASCI sASCII DUMP 
5911 CDA759 CALL TSTOF + DONE? 

5914 7D MOV ArL ¥NO 

5915 ES6OF ANI OFH sLINE END? 
S917 C20E59 JNZ DUMFS §NO 


S91A C3EFS8 JMP DUMF2 


7E 
FE7F 
D22859 
FE20 
D22A59 
SE2E 
C31B58 


CD3859 


CD4459 
DA7BS9 


C34959 


FEF? 
CA6859 
FEFO 
C27B59 
C1 

D1 

c9? 


ASCI; 


FASC23 
FASC33 


ST 


> en “er 


CHECK 


’ 
RDHLDE ? 
RDHLD23 


INPUT 


re ww © 


HLDE? 


INPUT 


TD o> a> «> 


EADHL 


RDHL 23 


CHECK 


DHL4; 


RDOHLS 3 
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DISFLAY MEMORY BYTE IN ASCII IF 
POSSIBLE» OTHERWISE GIVE DECIMAL FNT 


MOV Arm sGET BYTE 

cPI DEL *HIGH BIT ON? 
JNC PASC2 *YES 

CFI we wt sCONTROL CHAR? 
JNC FASCS3 9NO 

MVI Ar’.’ »CHANGE TO LOT 
JMP OUuUTT 9SEND 


GET Het AND DvE FROM CONSOLE 


THAT DvE IS LARGER 

CALL HHLIE 

MOV ArE 

SUB L gE - L 

MOV ArD 

SBB H sD - H 

Jc ERROR sH»L BIGGER 
RET 

HrL AND DxE. SEE THAT 


2 ADDRESSES ARE ENTERED 


CALL READHL #¢HeLl 


Jc ERROR sONLY 1 ADDR 
XCHG sSAVE IN DvE 
CALL READHL ¢DvE 

XCHG yPUT BACK 
RET 


HyL FROM CONSOLE 


PUSH D 

PUSH B sSAVE REGS 
LXxI Hr0 sCLEAR 
CALL GETCH *GET CHAR 
Jc RDHLS sLINE END 
CALL NIB ¥TO BINARY 
Jc RDHL4 ¢NOT HEX 
DAD H #TIMES 2 
DAD H +TIMES 4 
DAD H *TIMES 8 
DAD H sTIMES 14 
ORA L sADL NEW CHAR 
MOV LyA 

JMP RDHL2 9NEXT 


FOR BLANK AT END 


CPI APOS ¥ APOSTROPHE 
JZ RDHLS sASCII INPUT 
CFI (% %="0%) AND OFFH 
JNZ ERROR ¥NO 

POF B 

POP 0 sRESTORE 

RET 
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CONVERT ASCII CHARACTERS TO BINARY 


zee wo 


5S96B Dé30 IB: SUI ‘0’ *ASCII BIAS 
S96D D8 RC 7 = 0 
S96E FE17 CPI “FSO 41 
5970 3F CMC + INVERT 
5971 D8 RC sERRORy > F 
5972 FEOA CPI 10 
5974 3F CMC 9 INVERT 
5975 Do RNC sNUMBER 0-9 
5976 01607 SUI “AL-49 m1 
5978 FEOA CPI 10 sSKIP 3 TO 
S97A C9 RET sLETTER A-F 
’ 
¢ FRINT ? ON IMPROPER INPUT 
y 
S97B 3ESF ERROR: MVI Ay’?! 
5970 CD1iBS8 CALL OUTT 
5980 C30058 JMP START sTRY AGAIN 


START NEW LINE» GIVE ADDRESS 
5983 CDR658 RHL CALL CRLF sNEW LINE 


PRINT Heyl IN HEX 


<> a> a> («> er > 


5986 4C OUTHL: MOV CrH 
5987 CD9359 CALL OUTHX 9H 


S98A 4D OUTLL: MOV Col 
OUTPUT HEX BYTE FROM C ANTI A SPACE 
598B CD9359 UTHEX: CALL OUTHX 


OUTFUT A SPACE 


© «> «> «> © «> « ~« 


S98E 3E20 UTSP3 MMVI Ar’ ¢ 
5990 C31B58 JMP OUTT 

g 

¢ OUTPUT A HEX BYTE FROM C 

* BINARY TO ASCII HEX CONVERSION 

’ 
5993 79 OUTHX: MOV AsC 
5994 1F RAR sROTATE 
S99S 1F RAR 9 FOUR 
5996 1F RAR > BITS TO 
S997 1F RAR % RIGHT 
5998 CD9CS9 CALL HEX1 sUPPER CHAR 
S99R 79 MOV ArC yLOWER CHAR 
S99C E6OF HEX1; ANI OFH sTAKE 4 BITS 
S9VE C690 ADI 9OH 
SPAO 27 DAA yDAA TRICK 
S9A1 CE40 ACI 40H 
S9A3 27 DAA 
S9A4 C31B58 JMP OUTT 


“a> “er er 


CHECK FOR END» Hel MINUS DrE 
INCREMENT Hel ; 


—————— 
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’ 
SPA7 23 TSTOP? INX H 
S9AB 7B MoV ArE 
SIAP 9S SUE L 7 E--L 
SPAA 7A MOV AD 
S9AB 9C SBE H > D-H 
S9AC DO RNC sNOT DONE 
S9AD Et POP H sRAISE STACK 
SVAE C9 RET 

, 
S9B1 END 


Type up the new instructions, then, after you leave the editor, rename 
the new file. The CP/M command will be 


REN MON2.ASM=MON1.ASM 


Rename the backup file to its original name. 


REN MON1.ASM=MON1. BAK 


Assemble version 2 and load it into memory. Start it up by branching 
to the address of START. Again, the version number should be printed, and 
the prompt symbol should appear. Test the new feature by dumping a por- 
tion of the monitor. 


>DS800 S85F 


Be sure to type a carriage return at the end of the line. Input errors can be 
corrected by typing a backspace or DEL. Check to see that the hex code 
displayed on the screen matches the assembly listing code. Most of the 
ASCII representation will be meaningless. But the section from 5842 to 
585A hex will read 


Ver 2 


Now test the scroll-freeze commands. Dump a large section of memory. 


>DO 1000 


Type a control-S as the data are being displayed on the console. The console 
screen should freeze. Now type a control-Q. The screen should again resume 
displaying the data. The commands of Control-S and control-Q will alter- 
nately freeze and resume the scrolling. 

Try the routine that checks for proper dump limits by typing a larger 
address first, then a smaller address. 


D300 200 
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As a result of this improper input, a question mark should be printed. Then 
the prompt will appear on a new line. If everything is all right, return to your 
regular system by entering a control-X. 

If version 2 does not perform satisfactorily, compare the hex code in 
your assembly listing with the values given in Listing 6.2 for the new code. 
Correct any errors, reassemble the program, and try it again. 


VERSION 3: A CALL AND GO ROUTINE 


Now that both hex-to-binary and binary-to-hex routines are available, we can 
easily include new features. A CALL routine and a GO routine will be added 
in version 3. These routines will allow you to branch to any address in mem- 
ory. The GO command will be useful for testing subroutines. For this latter 
command, the monitor warm-start address (WARM) is on the stack when the 
call is made. A subroutine can be called with the C command. The execution 
of an RET instruction at the end of the subroutine will cause a return to 
the monitor. 

First, change the version number to 3. Then find the instructions corre- 
sponding to the C and G commands after the label WARM. Remove the 
semicolons from the beginning of the lines that branch to CALLS and GO. 
Delete the prior lines that jump to WARM. The program should now look like 


CPI °C’ sCALL? 
JZ CALLS 

CPI ‘G’ §GO? 
JZ Go 


The remaining lines of code (and some comments) are placed at the end of 
the source program just prior to the END statement. They are given in 
Listing 6.3. 


Listina 6.3. A CALL and a GO routine. 


§ ROUTINE TO GU ANYWHERE IN MEMORY 
§ ADDRESS OF WARM IS ON STACKy SO A 
§ SIMPLE RET WILL RETURN TO THIS MONITOR 
5 
S9AF E1 GO: POP H sRAISE STACK 
S9BO CD4459 CALLS: CALL READHL *#GET ADDRESS 
S9B3S EP PCHL 9GO THERE 
, 
S9B4 END 


Another importarrtt change should be made at this time. Since we can 
now branch to any place in memory with the GO command, we can change 
the abort command, control-X. Redefine HOME near the beginning of the 
source program so that an abort command of control-X will restart the 
monitor. 
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HOME Eau ORGIN SABORT ADDRESS 


This line was originally entered as acomment. Remove the semicolon at the 
beginning of the line and delete the previous line. 

Assemble the new version and load it into memory. Branch to the 
monitor and try the dump routine as before. Try the CALL feature by 
calling the monitor itself. 


>C5800 


The cold-start message should appear. Now use the GO routine to return to 
your main system. If the GO address is zero, then no argument need follow 
the G command. 


>G 


VERSION 4: A MEMORY-LOAD ROUTINE 


In version 2 we added a routine that could be used to inspect any memory 
location. A routine which can be used to change memory will now be added. 
Change the version number to 4. Locate the instruction 


5 JZ LOAD 


following WARM. Remove the semicolon at the beginning of the line. Delete 
the original JZ WARM on the prior line. The program should now look like 


CPI of Bid 
JZ LOAD 


Add the load routines shown in Listing 6.4 to the end of the source program. 


Listing 6.4. A memory-load routine. 


LOAD HEX OR ASCII CHAR INTO MEMORY 
FROM CONSOLE. CHECK TO SEE IF 

THE DATA ACTUALLY GOT THERE 
APOSTROFHE FRECEEDS ASCII CHAR 
CARRIAGE RETURN FASSES OVER LOCATION 


‘a> er “E> <a> wer ~e> 


S9B4 CD4459 LOAD: CALL READHL sADDRESS 
S9B7 C8659 LOAD2: CALL OUTHL sPRINT IT 


S9BA CH1IDS9 CALL PASCI vASCIT 
S9BD CN8ES9 CALL OUTSP 

S9CO 4E MOV CoM sORIG BYTE 
59C1 CD8RS9 CALL OUTHEX #HEX 

S9C4 ES PUSH H sSAVE FNTR 
S9CS CD7C58 CALL INFL2 ¢INFUT 
59C8 CD4459 CALL READHL BYTE 


; 
S9CR 45 MOV Bel > TO RB 
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S9CC E1 FOF H 

S9CD FEF7 CcrI AFOS 

S9CF CADES9 JZ LOADS sASCII INPUT 
S9D2 79 MOV ArC sHOW MANY? 
S9D3 B7 ORA A »NONE? 

99ND4 CADAS9 JZ LOADS sYES 

S9D7 CDESS9 LOAD4: CALL CHEKM sINTO MEMORY 
SIDA 23 LOAD3: INX H sPOINTER 
S9DE C3B759 JMP LOAD2 


; 
¢ LOAD ASCII CHARACTER 
; 


SIDE CUCCS8 LOAD6: CALL GETCH 
S9EL 47 MOV BrA 
S9E2 C3D759 JMF LOAD4 


COFY BYTE FROM B TO MEMORY 
AND SEE THAT IT GOT THERE 


SYES 70 HEKM: MOV MB sPUT IN MEM 
S9ES 7E MOV Ary *GET BACK 
S9E7 B8 CMF BE +SAME? 
S9E8 C8 RZ ¥YES 
SYE9 C37B59 JMF ERROR >BAD 

’ 
SIEC END 


Assemble version 4 and compare the assembly listing of the new part to 
Listing 6.4. Load the new program and branch to the beginning. Recheck the 
dump command by examining the new code for the load routine 


>DS9B4 S9EB 


Now try the load command. Great care must be taken when typing the load 
address. This command will actually change the contents of memory, includ- 
ing the monitor itself. 

Type the letter L, the hexadecimal address, and a carriage return. The 
response will be the address that was typed and the current contents of that 
memory location. The data are represented two ways: in ASCII and in hex. 
If the ASCII value is not a printable character, it is rendered as a period. 

The displayed location can now be changed by typing the new value 
’ and a carriage return. The data can be entered in several ways. It can be in 
the form of one or two hex characters. If more than two characters are 
entered, only the last two are actually used. This allows you to correct an 
error by continuing to type. Errors can also be corrected with the backspace 
or the DEL/RUB key. A single ASCII character can be entered into memory 
by preceding it with an apostrophe. 

As each new value and a carriage return is typed, the next address and 
the present data value will appear. In this way, a machine-language routine 
can be entered from the console. Of course, using an assembler is a more 
efficient way to generate a long program. But our load routine will be useful 
for making simple changes or for writing short routines. 
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The load command is terminated by typing a control-X (if you redefined 
HOME as ORGIN back in version 3). It is also terminated if you enter a 
nonhex character. Control then returns to the monitor. If the load command 
is used to revise existing code, another feature is useful. A carriage return is 
given without entering any data. The memory pointer then skips over the 
current location and the corresponding value is not changed. 

After each revised byte is entered into memory, the monitor checks to 
see that the new value is correct. If an attempt is made to write into pro- 
tected, nonexistent, or defective memory, the load process is terminated and 
a question mark is printed. 

Try the load routine by entering the following five bytes into a conve- 
nient location such as 4000 hex. 


3E 7 D3 XX C9 


This sequence corresponds to the assembly language program 


3E07 MVI Ar? 
D3XXxX OUT XX 
c9 RET 


The value of XX is the console-data address (CDATA in the source program). 
Check the code with the dump command. 


D4000 4004 
Now use the CALL command to execute the routine 
C4000 


The console bell should sound and control will return to the command level 
of our monitor. 


VERSION 5: USEFUL ENTRY POINTS 


Changes to the first four versions were made for the most part by adding 
new instructions to the end of the existing program. For versions 5, 6, and 7, 
we are going to start the process over to some extent by inserting some new 
instructions in the middle of the existing program. 

At the beginning of the monitor there are two jump instructions. 


JMP COLD 
JMP WARM 


Entry points such as these are sometimes called vectors. The first jump to 
COLD is the initial, cold-start entry point into the monitor. Stack initiali- 
zation and printing of the sign-on message occur at this time. But other 
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housekeeping chores, such as interface initialization, could be performed in 
this section. The second vector causes a jump to WARM, a restart entry point 
that does not alter the stack pointer. 

We will now insert some additional vectors after these first two. The 
additional jumps will provide fixed entry points to useful subroutines in the 
monitor. These routines can then be easily called by other programs outside 
the monitor. Since these jump instructions are all at the beginning of the 
monitor, their addresses won’t change when the monitor is altered. Further- 
more, new vectors can be added to the end of the group without affecting 
those already present. 

Place the five jump instructions shown in Listing 6.5 at the beginning of 
the monitor just after the first two (START and RESTRT). 


Listing 6.5. Some useful entry roints,. 


§ VECTORS TO USEFUL ROUTINES 


5806 C32A58 CouT: JMP OUTT sOUTPUT CHAR 
5809 C31558 CIN: JMP INPUTT +#INFUT CHAR 
S80C C3D058 INLN? JMF INPLN sINPUT LINE 
S80F C32559 GCHAR: JMF GETCH sGET CHAR 
5812 C3ECS9 OUTH: JMP OQUTHX ¢BIN TO HEX 


Reassemble the monitor, load it into memory, and try the DUMP, LOAD, 
and GO routines again to be sure that they still work. Now, when separate, 
external routines are written, they need not contain subroutines for console 
input, output, conversion of binary to hex, and so on. 

A character can be displayed on the console by calling COUT with the 
character in the accumulator. A single console character is obtained by 
calling CIN. The byte is returned in the accumulator. 

An entire line of characters can be easily obtained by calling the line- 
input entry INLN. As each character is typed, it is automatically printed on 
the console. The error-correction commands are available at this time. The 
backspace and DEL/RUB keys can be used to delete the previously typed 
character. A line is normally terminated with a carriage return. After the 
console-input buffer has been filled by a call to INLN, the GCHAR address 
can be called. 

A character is returned in the accumulator for each call to GCHAR. 
When the input buffer has been exhausted, the carry flag is set. Typing a 
control-X will abort a routine and return control to the monitor. Therefore, 
it is not necessary to include an abort routine in separate, external programs. 

The fifth new entry point will perform a conversion from binary to 
ASCII-coded hexadecimal. This will allow display of individual memory 
locations or any of the CPU registers. The byte to be converted is placed in 
the C register and the address of OUTH is called. The accumulator is also 
used by the conversion routine in this case, so it may be necessary to save 
the accumulator’s original contents on the stack by using a PUSH instruction. 
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Use the monitor to write the following short routine. This program will 
demontrate the new vectors. 


3E07 MVI Ar? 
C30658 JMP COUT 


This program, which is similar to the one written in the last section, can be 
placed almost anywhere in memory. This time, however, there is no need to 
worry about the output device address since the monitor takes care of this. 
Branch to the routine by giving the monitor command of C and the address 


704000 


The monitor output routine will ring the console bell, then cause a return to 
the address WARM. 

The monitor now contains a bare minimum of features. The DUMP, 
LOAD, GO, and CALL routines can be used to write and inspect simple 
routines. The several vectors located at the beginning of the monitor, allow 
easy access to useful subroutines within. These vectors will greatly simplify 
the task of writing and debugging simple routines. 

At this point, you may wish to go on to Chapter 8 and try some of the 
routines discussed there. Otherwise, continue in this chapter as we add more 
features to the monitor. The new features will include memory fill and zero, 
memory search, ASCII load and dump, input from and output through any 
port, a memory test, byte replacement, and memory comparison. 


VERSION 6: AUTOMATIC MEMORY SIZE 


A routine that will automatically find the top of usable memory will be 
added for version 6. The routine is executed each time a cold or warm start 
is performed. The first byte of memory in each page of 256 bytes of mem- 
ory is checked, starting with page zero. The byte in memory is moved to the 
accumulator, complemented, then written back to the same memory loca- 
tion. The result is compared to the accumulator to see if it is the same. If so, 
then the byte in the accumulator is complemented back to the original byte 
and it is written back into memory. This effectively restores the original byte. 
Each page of memory is checked in this way until the monitor stack 
area is encountered or until defective, missing, or protected memory is 
found. The hexadecimal value of this top page is printed just preceding the 
monitor greater-than prompt (>). For example, if the monitor starts at 
5800 hex and the stack is located at 57A0, then the prompt will appear as 


57> 
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This routine provides a regular, continuous check on the memory size. It 
does not check all of the memory, but only the first byte of each 256 bytes 
of the page. Nevertheless, this check may point up potential problems. A 
more complete memory test program will be added in version 15. 


Listina 6-6. Automatic memory check. 


FIND TOP OF USABLE MEMORY. 

CHECK FIRST BYTE OF EACH FAGE OF MEMORY 
STARTING AT ADDRESS ZERO. STOP AT STACK 
OR MISSING/DEFECTIVE/PROTECTED MEMORY. 
DISPLAY HIGH BYTE OF MEMORY TOP. 


<e> <a> er “er <a> “er 


5865 210000 LXI HrO sPAGE ZERO 
5868 0657 MVI BySTACK SHR 8 

S86A 7E NFAGE? MOV AM sGET BYTE 
S86B 2F CMA + COMPLEMENT 
986C 77 MoV MrA sPUT IT BACK 
S860 BE CMP M +SAME? 

S86E C27858 JINZ MSIZE 9NOr MEM TOP 
9871 2F CMA sORIG BYTE 
5872 77 MOV MrA sRESTORE IT 
5873 24 INR H sNEXT PAGE 
5874 05 DCR B 

5875 C26A58 JNZ NPAGE yKEEP GOING 
5878 4C MSIZE: MOV CrH sMEM TOP 

5879 CDOFS9 CALL CRLF sNEW LINE 
987C CDECS9 CALL OUTHX sFRINT MEM SIZE 
S87F CDDOS8 CALL INPLN sCONSOLE LINE 
9882 CD2559 CALL GETCH sFIRST CHAR 


Insert the new instructions shown in Listing 6.6 right after the PUSH H 
instruction that follows the label WARM. 


WARM: LXxI H»WARM RET TO 
PUSH H 5 HERE 


(add new code here) 


If your assembler does not have the shift-right operation SHR, then just code 
the high half of the stack address. The second line in Listing 6.6 might look 
like this instead. 


MVI B»yS7H 


Assemble the new version. Check the assembly listing to see that the new 
additions are correct. Then try out version 6. 
The symbol table at this point follows. 
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symbols? 

OOF7 APOS 0008 BACKUP S9BO CALLS 0011 CDATA 
0011 CDATAO S9ES CHEKM 584A COLD ooon CR 
5983 CRHL S8B6 CRLF 0010 CSTAT 0010 CSTATO 
0008 CTRH 0011 CTRQ 0013 CTRS 0018 CTRX 
OO7F DEL S8EC LUMP SSEF DUMP2 S8F2 DUMPS 
5905 DUMP4 S9OE DUMPS 597B ERROR 001B ESC 
S8EO GETC4 S8CC GETCH S9AF GO S99C HEX1 
5938 HHLDE 0000 HOME S7AS IBUFC S7AS& IBUFF 
S7A3 IBUFF OODB INC 0001 INMSK S87C. INFL2 
5898 INPL3 S8CO INFLB S8A8 INFLC S8A2 INPLE 
5884 INPLI 35877 INFLN S80C INFUT2 5806 INPUTT 
5816 INSTAT OOOA LF S9B4 LOAD S9B7 LOALZ 
S9DA LOADS 5907 LOALA SIDE LOADS S946K NIB 
0002 OMSK 5800 ORGIN 581C OUT2 582A OUT3 
5835 OUT4 00D3 OUTC 598B OQUTHEX 5986 OUTHL 
5993 OUTHX S98A OUTLL S98E OUTSF S81B OUTT 
5928 PASC2 S92A PASC3 591D PASCI S7A0 FORTN 
5949 RDHL2 SISE RDHL4 5968 RDHLS 5930 RDHLD2 
992D RDHLDE 5944 READHL 5803 RESTRT 0O0OC9 RETC 
S8E2 SENDIM 5840 SIGNON S7AO STACK S800 START 
0009 TAB 0018 TOF SYA7 TSTOF 0031 VERS 
5853 WARM 


VERSION 7: COMMAND-BRANCH TABLE 


Before incorporating additional features into the monitor, we should make 
a fundamental change in the command processor routine. This routine inter- 
prets the initial character of the command line. The routine looks for com- 
mands beginning with the letter D, C, G, or L. Five bytes of instruction are 
needed for each one of these commands. For example, the LOAD routine 
uses the instructions 


CPI “L’ 
JZ LOAD 


Since there are 26 letters of the alphabet, there will eventually be 26 times 
5, or 180 bytes needed if 26 different commands are incorporated. This 
approach is satisfactory for a short table, but there is a better approach when 
there are many entries. 

An alternate method is to use a command branch table. This method 
only requires two bytes per table entry plus 23 bytes of decoding instruc- 
tions. The disadvantage of this method is that all 26 table entries will have to 
be allocated, even if only a few are needed. Thus, there may be a lot of 
unallocated table entries. 

Delete the 13 lines of program immediately following the command of 
CALL GETCH, just after the label MSIZE. 
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CPI ‘D’ SDUMP <delete 13 lines> <====! 
o 6 © ' 
7 o7 7 ! 

JMP WARM sTRY AGAIN {sss=! 

The new code that will be added is given in Listing 6.7. Notice that there are 
26 table entries. Each line corresponds to one letter of the alphabet. At this 
time, most of the entries refer to the erro? routine called ERROR. This is 
because we have not yet incorporated many features. As new features are 
added to the monitor, these error references will be replaced by the desired 
subroutine names. 


Listing 6.7. Command-branch table. 


MAIN COMMAND PROCESSOR 


ry 
, 
rs 
’ 


5885 0641 sSuI “AS sCONVERT OFFSET 
59887 DAD45S9 Jc ERROR 5 <A 

S88A FE1A CFI ‘ZS -ACH1 

S88C D2D459 JNC ERROR 9 > Z 

S88F 87 ADD A > DOUBLE 

5890 219C58 LXI Hy TABLE #START 

5893 1600 MVI Dvd 

S895 SF MOV EvA +OF FSET 

5896 19 DAD D sADD TO TABLE 
5897 SE MOV EoM sLOW BYTE 
5898 23 INX H 

5899 56 MOV Dem sHIGH BYTE 
589A EB XCHG sINTO Hel 
S89B E? PCHL #GO THERE 


COMMAND TABLE 


— <> > «> 


S89C D459 ABLE: DW ERROR yAy ASCII 

S89E D459 DW ERROR iB 

S8AO0 O95A nw CALLS 7Cy CALL SUBR 
S8A2 4559 DW DUMP *Dy DUMP 

S8A4 D459 DW ERROR vE 

S8A6 D459 BW ERROR 9Fe FILL 

S8A8 O85A DW GO 9Gr GO 

SBAA D459 DW ERROR sHy HEX MATH 
S8AC D459 DW ERROR ¢Iy PORT INPUT 
S8BAE D459 Dw ERROR 9J» MEMORY TEST 
S8BO D459 DW ERROR aK 

S8B2 ODSA DW LOAD gL» LOAD 

S8B4 D459 DW ERROR 3M» MOVE 

S8B6 D459 DW ERROR aN 

S8B8 D459 DW ERROR *O» FORT OUTPUT 
S8BA D459 DW ERROR aF 

S8BC D459 DW ERROR sQ 

S8BE D459 DW ERROR gRy REPLACE 
S8co D459 DW ERROR 9S» SEARCH 

5S8C2 D459 DW ERROR aT 

58C4 D459 DW ERROR aU 

58C6 D459 DW ERROR 3Vy VERIFY MEM 
58C8 D459 DW ERROR oW 

S8CA D459 DW ERROR +X» STACK POINTER 
S8cc D459 DW ERROR ay 


S8CE D459 DW ERROR *Zy ZERO 
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Generate the new version, assemble it, and compare the resulting assem- 
bly listing to the one given in Listing 6.7. Try out version 7. It should behave 
exactly like version 6. It will be a bit longer than version 6 at this stage, but 
it will not grow as rapidly as we add new features. In the remainder of this 
chapter, we will add the new subroutines to the end of source program. The 
label for the subroutine will be placed in the appropriate place of the com- 
mand branch table. 


VERSION 8: DISPLAY THE STACK POINTER 


By adding seven bytes of new code, we will be able to examine our monitor’s 
stack pointer. This will alert us to a possible problem with the monitor 
itself. We may find, for example, that as we use the monitor, the stack tends 
to grow up or down in memory, rather than remain in the same place. This 
is undesirable and indicates that we are not properly lowering or raising the 
stack somewhere in the program. For example, subroutine TSTOP increments 
the pointer then checks to see if the current task should be terminated. If so, 
the stack is raised with a POP instruction. Then a return instruction skips 
one level of subroutines, so that control returns to the address of WARM. 

Change the version number to 8. Also change the entry in the command 
table that corresponds to the command of X. This is the third from the last 
entry. Delete the word ERROR and replace it with the word REGS. 


DW REGS 9X» STK POINTER 
Then go to the end of the source program. We will make a minor change in 
subroutine CHECKM, the last subroutine in the monitor. Then the new 
instructions will be added. Delete the END statement and the instruction 
just prior to the END statement. 

JMP ERROR sBAD 


Then add the new instructions as shown in Listing 6.8. 


Listing 6.8. Disrelay the stack rointer. 


SA42 Fil ERRP: FOP PSW sRAISE STACK 
SA43 3E42 ERRB? MVI Ar‘’B’ *BRAD 
SA45 CD2A58 ERR23 CALL OUTT 
SA48 CDE7S9 CALL OUTSF 
SA4B C3DFS9 JMP OUTHL sPOINTER 
, 
¢ DISPLAY STACK POINTER REGISTER 
5 
SA4E 210000 REGS: LXI HrO 
SAS1 39 DAD SP 


SAS2 C3DFS9 JMP OUTHL 
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Reassemble the monitor and try it out. First give the X command (with no 
argument). Make a note of the value given for the stack pointer. Now, try 
other monitor features such as the dump and load commands. After each of 
these commands, give the X command to see that the stack pointer remains 
in the same place. 

Try the separate routine that rings the console bell. This routine, which 
was written for version 4, may have to be rewritten if it was destroyed by 
the assembler or the editor. Again, check that the stack pointer is still in the 
same place. When you are convinced that everything is all right, continue to 
the next version. 


VERSION 9: ZERO AND FILL ROUTINES 


In version 4, we added a routine that could be used to change individual 
memory locations, one at a time. We will now add a routine which will allow 
us to fill a portion of memory with a constant value. A separate command 
for zeroing memory is also added for convenience, even though this opera- 
tion could be performed with the FILL command. 

Change the version number to 9, then alter the two command table 
entries that correspond to the F (fill) and Z (zero) commands. 


DW FILL 5F» MEMORY 


DW ZERO 9Z» MEMORY 


Add the new code shown in Listing 6.9 to the end of the program. 


Listing 6.9. Zero and fill routines. 


ZERO A PORTION OF MEMORY 
THE MONITOR AND STACK ARE 


INI eo sem wen see 


PROTECTED 
SASS CD8659 ERO; CALL RDHLDE *#RANGE 
SAS8 0600 MVI Br0 
SASA C36465A JMP FILL2 


FILL A PORTION OF MEMORY 


Tw o> 


SASD CD7CSA ILL? CALL HLDEBC *RANGEs BYTE 
SA60 FEF7 cPI AFOS sAPOSTROPHE? 
SA62 CA7SSA JZ FILL4 sYES ASCII 
SA6S 41 MOV BrC 

SA66 7C FILL2: MOV AvH sFILL BYTE 
SA67 FES7 CFI STACK SHR 8 #TOO FAR? 
SA69 D20459 JNC ERROR VYES 

SA6C CISESA FILL3: CALL CHEKM sPUT? CHECK 
SA6F CLOOSA CALL TSTOF > DONE? 


SA72 C3665A JMP FILL2 sNEXT 
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9A75 CN2559 FILL4: CALL GETCH syASCII CHAR 
SA78 47 MOV BrA 
SA79? C36CSA JMP FILL3 


GET HyL DvE AND BrCl 


Xl a> > > 


SA7C CIBASA LDERC: CALL HLDECK #RANGE 


SA7F DADAS9 Jc ERROR sNO BYTE 
SA82 ES FUSH H 

SABS CDYDS? CALL READHL #3RD INPUT 
SABS 44 MOV ByH +MOVE TO 
SA8B7 4D MOV Cel » BrC 

SASS El FOP H 

SABI C9 RET 


GET 2 ADDRESSES» CHECK THAT 
ADDITIONAL DATA IS INCLUDED 


SABA CD9159 LBDECK: CALL HHL DE 32 ADDR 
SABD DAD4S9 Jc ERROR ¥THAT’S ALL 
SAID C38959 JMPF RDHLD2 #s#CHECK 


Assemble the program, load it into memory, and try it out. First, dis- 
play a portion of memory. 


>D4000 404F 
Then, zero out a part of this region. 


>Z4000 403F 


Display the region again to be sure that the zero routine is working. Now fill 
a portion of the previously zeroed memory with A5 hex bytes. 


>F4001 401E AS 

Again, dump this region of memory to ensure that the fill routine is working. 
>B4000 404F 

Finally, check the ASCII fill command by filling with a $ symbol. 


>F4020 402F ’$ 


As with the load command, ASCII input is preceded by an apostrophe. 


VERSION 10: A BLOCK-MOVE ROUTINE 


The next routine to be added will allow us to move a block data from one 
memory location to another. This is actually a duplication routine, since the 
original memory block will remain unchanged. As each byte is moved to the 
new location, a check is made to ensure that it actually got there. 
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First, change the version number to 10. Then add the new lines to the 
end of the source program. Change the branch table entry corresponding to 
the command of M. 


DW MOVE 3M» MEMORY 


Insert the instructions given in Listing 6.10 to the end of the source program. 
Assemble the monitor and try it out. 


Listina 6.10. A block-move routine. 


§ MOVE A BLOCK OF MEMORY HeL-DvE TO BrCl 
5 

SA93 CD7CSA MOVE: CALL HLDEBC +3 ADDR 

SA96 CDAOSA MOVDN: CALL MOVIN sMOVE/CHECK 


SA99 CDOOSA CALL TSTOP > DONE? 
SAIYC 03 INX B 9NO 
SAID C39465A JMP MOVDN 
y 
SAAO 7E MOVIN: MOV ArM iBYTE 
SAA 02 STAX B yNEW LOCATION 
SAA2 OA LDAX B + CHECK 
SAAS BE CMP M 9IS IT THERE? 
SAA4 C8 RZ sYES 
SAAS 60 MOV HrB sERROR 
SAAS 69 MOV L»C sINTO Hel 
SAA7 C3425A JMP ERRP sSHOW BAD 


The move command requires three addresses. These are the start and 
stop address of the source block and the start address of the destination 
block. For example, 


>M5800 S8FF 4000 


will move the first page of the monitor (5800 to 58FF hex) down to the 
address range 4000 to 40FF hex. 

The move routine is designed to move data downward. Thus the first 
byte of a block can be deleted by moving the remainder of the program 
downward by one byte. The command 


>M103 1000 100 


moves the memory block in the address range 103 through 1000 down three 
bytes to the memory range 100 through FFD hex. On the other hand, a 
block move in the upward direction must be done carefully. 

If the new block does not overlap the old, then there is no problem. 
But if there is an overlap, then the upward move will destroy some of the 
data. One possible solution to this problem is to first move the block down- 
ward until it is clear of the new upper block. Then move the block up to the 
desired location. Another possibility is to move the upper half of the block 
first, then move the lower half. 


DEVELOPMENT OF A SYSTEM MONITOR 113 


The best solution is to have a more sophisticated move routine. This 
routine should first determine whether the move is to be upward or down- 
ward. If the movement is downward, then the move commences with the 
lower part of the block (as with the present program). But if the move is 
upward, then it should begin with the upper end of the block. The memory 
pointers should now move downward in memory. With this approach, the 
original data will be unaltered. This additional feature is more easily coded 
with the Z-80 block-move routines than with the 8080 instructions. 

We have not incorporated the upward-move feature at this time. In 
developing a system monitor, there must be a tradeoff between features and 
space. A minimum of idiot-proofing is necessary. But, if we want to have a 
monitor that will fit into 1K bytes of ROM, we will have to make some 
compromises. 

Notice that this move routine moves a byte from the source location 
into the destination location. It then reads the byte back from the new loca- 
tion to see that it actually got there. If an attempt is made to move data into 
read-only memory, protected memory, or defective memory, the process will 
be terminated. The address of the location will be printed following the 
letter B (for ‘“‘bad’’). 

If we want to retain this memory-checking feature, we will not be able 
to use the Z-80 block-move routines. The problem is that the Z-80 routines 
perform an automatic pointer increment after each byte is moved. Ifa 
memory check is desired, then the destination pointer will have to be backed 
up after each byte is moved. This will allow the newly moved byte to be 
checked. Finally, the pointer will have to be incremented again. 


VERSION 11: A SEARCH ROUTINE 


Sometimes it is necessary to find a particular data byte or address in memory. 
Or perhaps all occurrences of a data byte or an address within a memory 
block are needed. For version 11, we will add a hex search routine. Change 
the version number and the branch table entry for the letter S. 


DW SEARCH 5S» MEMORY 


Add the new instructions as given in Listing 6.11. 


Listing 6.11. Search for 1 or 2 bytes. 


* SEARCH FOR 1 OR 2 BYTES OVER THE 

* RANGE Hel DvE. BYTES ARE IN BoC 

5 B HAS CARRIAGE RETURN IF ONLY ONE BYTE 

> PUT SPACE BTWEEN BYTES IF TWO 

¢ FORMAT: START STOP BYTEL BYTE2 

5 
SAAA CI7CSA SEARCH: CALL HLDEBC $RANGE» 1ST BYTE 
SAAD 0600 SEAR2: MMVI BsCR sSET FOR 1 BYTE 
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SAAF DABSSA Jc SEARS sONLY ONE 
SAB2 ES PUSH H 

SAB3 CD9DS9 CALL READHL #2ND BYTE 
SAB6 45 MOV Bol sINTO C 
SAB7 El FOP H 

SABB 7E SEAR3: MOV AM sGET BYTE 
SABI B9 CMF c sMATCH? 
SABA C2CFSA JNZ SEAR4 9NO 

SABD 23 INX H sYES 

SABE 78 MoV Ark sONLY 1? 
SABF FEOD CFI CR 

SAC1 CACISA JZ SEARS sYES 


FOUND FIRST MATCH» CHECK FOR SECOND 


‘o> “er <a> 


SAC4 7E MOV A»yM sNEXT BYTE 
SACS BS CMF B sMATCH? 
SAC6 C2CFSA JNZ SEAR4 sNO 

y 
SAC 2B SEARS: DCX H 3A MATCH 
SACA CS PUSH B 
SACB CDDICS9 CALL CRHL *SHOW ADDR 
SACE Cl FOP B 
SACF CDOOSA SEAR4: CALL TSTOP ’ DONE? 
SAD2 C3B85A JMP SEAR3 §NO 


Our new feature will display the address of every occurrence of one or 
two chosen bytes. For example, the command 


>$100 4FF OD 


will print the address of each occurrence of a carriage return (OD hex) over 
the memory block 100 to 4FF hex. The alternate command 


>SO FFFF 3E 10 


includes two search bytes. This command will look for the byte 3E followed 
by the byte 10 over the entire 64K-byte memory range. These two bytes 
might represent the 8080 instruction MVI A,10 or perhaps the address 
1038E hex. 

Notice that if two search bytes are given in the command, they must 
be separated by a space. If the command is incorrectly given without the 
space between the bytes, the search will only include the second byte. For 
example, the command 


>SO FFFF 3E10 


will be interpreted as a search for the byte 10 hex. This occurs because only 
the last two characters of the field are used. 


DEVELOPMENT OF A SYSTEM MONITOR 115 


VERSION 12: ASCII LOAD, SEARCH, AND DISPLAY 


At this time, the monitor is hex oriented, but it is capable of limited ASCII 
operations. For example, the DUMP routine gives both the hex and the 
ASCII representation of the data. The load and fill commands will accept 
ASCII characters when preceded by an apostrophe. In version 12, we will 
add three new ASCII commands: ASCII load, ASCII dump, and ASCII 
search. A continuous series of ASCII characters (a string), including a car- 
riage return, line feed, tab, and so on, can be entered directly into memory. 
A straight ASCII dump will render an ASCII portion of memory in its 
natural form. And we will be able to search the memory for one or two 
ASCII characters. If the command line begins with the letter A, a branch 
will occur to a second command processor. The letter following the A will 
cause a jump to the desired task of dump, load, or search. 

Change the version number to 12 and the command table entry for the 
letter A. 


DW ASCII sAy DUMP, LOAD 
Type the code from Listing 6.12; assemble the new version and start it up. 


Listing 6.12. ASCII loady searchy and display. 
ASCII SUB-COMMAND FROCESSOR 


; 
, 
SADS CD2559 ASCII: CALL GETCH sNEXT CHAR 


SADS FE44 CPI ‘DD’ s DISPLAY 
SADA CAO45B JZ ADUMP 

SADD FES3 CPI ‘Ss’ 3 SEARCH 
SADF CA2CSB JZ Ascs 

SAEZ FE4C CPI 4 sLOAD 
SAE4 C2D459 JNZ ERROR 


LOAD ASCII CHARACTERS INTO MEMORY 
QUIT ON CONTROL-X 


‘o> ee “a> > 


SAE7 CD9DSI CALL READHL *sADDRESS 
SAEA CDDFS9 CALL OUTHL sPRINT IT 
SAED CD1558 ALOD2: CALL INPUTT *%NEXT CHAR 
SAFO CD2AS8 CALL OUTT sPRINT IT 
SAFS 47 MOV BrA 3 SAVE 

SAF4 CD3ESA CALL CHEKM ¥INTO MEMORY 
SAF7 23 INX H sPOINTER 
SAF8 7D MOV AsL 

SAFO ES67F ANI 7FH sLINE END? 
SAFB C2EDSA JINZ ALON2 >NO 

SAFE CDDCS9 CALL CRHL sNEW LINE 
SBO1 C3EDSA JMP ALOD2 


DISPLAY MEMORY IN STRAIGHT ASCII. 
KEEP CARRIAGE RETURN, LINE FEED» CHANGE 
TAB TO SPACE» REMOVE OTHER CONTROL CHAR. 


<a> “a> er er ~e> 
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SBO4 CD8659 ADUMP: CALL RDHLDE #sRANGE 


SBO7 7E ADMF2: MOV AM sGET BYTE 
SBO8 FE7F CPI DEL sHIGH BIT ON? 
SBOA D22655 JNC ADMP4 9YES 

SBOD FE20 CFI 23% >CONTROL? 
SBOF D2235B JNC ADMPS 5NO 

5B12 FEOD CPI CR sCARR RET? 
5B14 CA235B JZ ADMPS sYES» OK 

SB17 FEOA CPI LF sLINE FEED? 
SB19 CA235B JZ ADMPS ¥YES» OK 

SB1C FEO? CPI TAB 

SBIE C2265B JNZ ADMP4 sSKIP OTHER 
SB21 3E20 MVI Ar’ ¢ 5SPFACE FOR TAB 
SB23 CD2AS8 ADMP3$ CALL OUTT sSEND 

SB26 COOSA ADMF4: CALL TSTOP > DONE? 

SB29 C3075K JMP ADMP2 »NO 


SEARCH FOR 1 OR 2 ASCII CHARACTERS 
NO SPACE BETWEEN ASCII CHARS 
FORMAT: START STOP 1 OR 2 ASCII CHAR 


D eo «er wo «> wo 


SB2C Ch8659 scs? CALL RDHLDE #RANGE 


SB2F CD2559 CALL GETCH sFIRST CHAR 

SB32 4F MOV Cré 

SB33 CD2559 CALL GETCH 92ND OR CARR RET 
5SB36 DAADSA Jc SEAR2 sONLY ONE CHAR 
SB39 47 MOV BrA 32ND 

SB3A C3B85A JMP SEARS 


Dump a section of memory with the regular hex dump command. Then 
enter a line of ASCII characters using the new ASCII load command. 


>AL4000 <carriade return> 
4000 This is a test of the new <cr><1f> 
ASCII load routine. <cr><lf> 


All of these characters will be deposited directly into memory, including the 
carriage returns and line feeds. Type a control-X to abort the task. Inspect 
the new addition first with the hex dump 


>D4000 404F 
then inspect it with the new ASCII dump: 
>AD4000 404F 


Notice the difference. The ASCII dump renders the data as it was originally 
typed. 

A carriage-return line-feed pair will cause a real carriage-return line-feed 
pair to be sent to the console. Tab characters are not expanded but are ren- 
dered as blanks (in line with our goal of reducing the monitor size). All 
other control characters are ignored. 
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VERSION 13: INPUT AND OUTPUT TO ANY PORT 


The load routines added in versions 4 and 12 allow us to change individual 
memory locations. And the dump routines added in versions 2 and 12 allow 
us to inspect individual memory locations. For version 138, we will add a 
routine to read any I/O port and another to send a byte to any I/O port. 
This feature will allow us to initialize and test I/O ports. 

The 8080 and Z-80 microprocessors can address 256 separate, 8-bit 
input/output ports. These ports are used for communicating with the con- 
sole, list, and tape devices. In addition, if there is a front panel, the switches 
are usually assigned to a separate data port. Also, some disk-controller 
boards use several I/O ports for communication with the CPU. 

-It is more difficult to implement these I/O features on an 8080 CPU 
than on a Z-80. The reason is that the 8080 I/O instructions require the port 
address to be placed in memory immediately following the IN or OUT 
command 


DB 10 IN 10H 
D3 11 ouT 11H 


By comparison, the Z-80 can execute I/O instructions with the device 
address located in the C register. Nevertheless, we will implement the input 
and output instructions, at this time, using only 8080 code. 

The plan is to write the IN or OUT instruction in memory, write the 
port number in the next byte, then write a RET instruction in the third 
position. A call to the address of PORTN will then produce the desired 
effect. The routine that writes these bytes in the stack area is called PUTIO. 
Since we are developing a monitor that can be placed in ROM, we will have 
to perform the actual I/O instructions outside of the regular monitor code 
area. Three bytes of memory just above the stack were previously set aside 
for this purpose. They start with the address PORTN. 

A fourth routine is also needed. Subroutine BITS is used to convert the 
binary data read from the selected port into ASCII-coded binary characters. 
An IN command then prints on the console the port data in both hex and 
binary. For example, the command 


>IFF 
will give the front-panel switch setting in both hex and binary notation. 
F8 11110000 


The BITS routine can be coded more efficiently if a Z-80 CPU is available. 
This is because the Z-80 can shift data in the general-purpose registers, as 
well as in the accumulator. This is discussed in Chapter 7. 

Change the version number to 13 and alter the branch table entries for 
the letters I and O. 
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DW IPORT Iv PORT INPUT 
DW OPORT §Or PORT OUTPUT 


Add the new routines to the end of the source code. Assemble version 13 


and try it out. 


Listing 6.13. 


SB3D CD9DS9 PORT: CALL 
SB40 4D MOV 
SB41 3EDB MVI 
9H43 CD635B CALL 
SB46 6F MOV 
SB47 CDE3S9 CALL 

’ 

¢ PRINT 

, 
SB4A 04608 BITS: MVI 
SB4C 7D BIT23 MOV 
SB4D 87 Ann 
SB4E 6F MOV 
SB4F 3E18 MVI 
SBS1 8F Apc 
SBS2 CU2AS8 CALL 
SBSS 0S DCR 
SBS6 C24CSB JNZ 
SBS9 C9 RET 

y 

, 

5 FORMAT IS? 

, 
SBSA CD9DS9 OPORT? CALL 
SBSD 4D MOV 
SBSE Ch9DS9 CALL 
SR61 3ED3 MVI 

, 

, 

, 
SB63 32A057 PUTIO: STA 
SB466 79 MOV 
SB67 32A157 STA 
SB6A 3EC9 MVI 
SB6C 32A257 STA 
SB6F 7D MOV 
SB70 C3A057 JMP 


READHL 
Cyl 
Av INC 
PUTIO 
LoA 
OUTLL 


B»8 

ArL 

A 

Ly+A 
Ax’04/2 


A 
OUTT 
B 
BIT2 


READHL 
Crk 

READHL 
AvxOUTC 


PORTN 
ArC 
PORTN+1 
A»RETC 
PORTN+2 
ArL 
PORTN 


Ineut and outrut to any rort. 


9PORT 

sPORT TO C 
sIN CODE 
sSETUF INPUT 


sHEX VALUE 


L REGISTER IN BINARY (8080 VER) 


*8 BITS 
¢SHIFT LEFT 
sHALF OF O 

> NOUBLE+CARRY 
gFRINT BIT 


98 TIMES 


OUTPUT BYTE FROM PORT (8080 VERSION) 
OvPORTs BYTE 


sPORT 


*DATA 
sOUT OFCODE 


EMULATE Z80 INP AND OUTP FOR 8080 


sIN OR OUT CODE 
yPORT NUMBER 


sRET OPCODE 


sOUTPUT BYTE 
sEXECUTE 


If you have a set of front panel switches, give the command 


>IFF 


and see if the bit pattern matches the actual switch setting. Next, try to ring 


your console bell by sending a binary 7. 
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2011 7 


The value of 11 should be changed to your console data port address if it 
is different. 

Modern serial and parallel ports need to be initialized before use. These 
initialization routines could be placed in the monitor cold-start routines. 
Initialization can also be performed with the new monitor output command. 
A Motorola 6850 serial port can be initialized for one stop bit with the two 
commands 


7010 3 <reset> 
>010 15 <set> 


where 10 is the address of the status/control port. 


VERSION 14: HEXADECIMAL ARITHMETIC 


A routine for obtaining the sum and difference of two hexadecimal numbers 
will now be added. Change the version number to 14. Change the branch 
table corresponding to the entry H. 


DW HMATH ¢Hy HEX MATH 
Place the remaining new lines at the end as usual. 


Listing 6.14. Hecadecimal addition and subtraction. 
HEXADECIMAL MATHy SUM AND DIFFERENCE 


, 
, 
5SB73 CN9159 HMATH: CALL HHLDIVE sTWO NUMBERS 


SB76 ES PUSH H sSAVE Hel 
SB77 19 DAD n 9SUM 

SB78 COIFS9 CALL OUTHL sPRINT IT 
SR7B El POF H 

SB7C 70D MOV AsL 

SB7D 93 SUB E sLOW BYTES 
SR7E 6F MOV LrAé 

SR7F 7C MOV AvH 

SB80 9A SBR D 

SR81 67 MOV HrA sHIGH BYTES 
SB82 C3IIFS9 JMP OUTHL s DIFFERENCE 


The new feature is executed by typing the letter H and the hex num- 
bers. The response is the sum and the difference. 


>HB000 4000 
C000 4000 
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VERSION 15: MEMORY-TEST PROGRAM 


Back in version 6, we installed an automatic memory-size routine. This 
addition performs a memory check of sorts by testing the first byte of each 
page. In version 15, we will add a more complete memory-test program. 
Change the version number and the branch table entry for the letter J 
(justification): 


DW JUST §J* MEMORY TEST 


Then, type in the new lines as shown in Listing 6.15. 


Listing 6.15. A memory-test Frogdram. 


MEMORY TEST 
THAT DOESN’T ALTER CURRENT BYTE 
INFUT RANGE OF ADDRESSES» ABORT WITH “X 


‘<> er <a> <a> «> 


SB8S C8659 JUST: CALL RDHLDE sRANGE 


SB88 ES PUSH H sSAVE START ADDR 
SB89 7E JUST2: MOV AyM sGET BYTE 

SB8A 2F CMA sCOMPLEMENT IT 
SB8B 77 MOV MrA sPUT IT BACK 
SBSC BE CMP M sDID IT GO? 
SB8D C2A55B JNZ JERR ¢NO 

SB90 2F CMA sORIGINAL BYTE 
SB91 77 MOV MrA sPUT IT BACK 
SB92 7D JUST3: MOV AsL sPASS 

SB93 93 SUB E ¢ COMPLETED? 
SB94 7C MOV AvH 

SB9S5 9A SBR D 

SB96 23 INX H 

SB97 DA89SB Jc JUST2 >NO 


AFTER EACH PASS» 
SEE IF ABORT WANTED 


‘> <a> ~e> <a> 


SB9YA CN2558 CALL INSTAT # INPUT? 

SR9D C41558 CNZ INPUTT *YES» GET IT 
SBAO E1 FOP H sSTART ADDR 
SBA1 ES FUSH H sSAVE AGAIN 
SBA2 C3895B JMP JUST2 yNEXT PASS 


FOUND MEMORY ERROR»: PRINT POINTER AND 
BIT MAF’ O=GOOD» 1=BAD BIT 


CL <> sem <a> er 


SBAS FS ERR: FUSH FSW ySAVE COMPLEMENT 
SBAS CONCS9 CALL CRHL sPRINT POINTER 
SBA? Fi POP PSW 

SBAA AE XRA M sSET BAD BRITS 
SBAB ES FUSH H *SAVE POINTER 
SBAC 6F MOV LeA sRIT MAP TOL 
SBAD CD4ASK CALL BITS sPRINT BINARY 
SBERO E1 POP H 


SBB1 C3925K JMP JUST3 sCONTINUE 
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Assemble the program, load it into memory, and try it out. The mem- 
ory range from zero to 58FF hex is tested with the command 


>JO 5800 


This is a continuing test. The given range is tested over and over until aborted 
with a control-X command. This memory-test program is not very sophisti- 
cated. The routine will not find unusual problems in flakey, dynamic mem- 
ories. It will, however, locate those regions with no memory, protected 
memory, and grossly defective memory. The address of each bad location is 
printed in hex, then the bit pattern follows. ASCII ones are shown for the 
bad bits and ASCII zeros are given for the good bits. 

The test program gets the original memory byte, complements it, and 
puts it back. It then complements it a second time and restores the original 
byte. Thus, the original memory is left intact. The only caution here is that 
the stack area should not be tested. 

Much more sophisticated memory test programs are needed for diffi- 
cult memory errors. Of course, such programs will require a lot of memory, 
and so would not fit into a compact system monitor. One feature of such a 
program is to provide a delay between the time the test byte is placed into 
memory and the time that the byte is checked. One disadvantage of a more 
powerful memory-test program is that it does not protect the original 
memory contents. 


VERSION 16: REPLACE ONE BYTE WITH ANOTHER 


In version 11 we added a memory-search routine. This feature gives us the 
ability to find every occurrence of a particular byte. A companion feature 
added in version 16 allows us to change every occurrence of a particular byte 
to a different byte. Change the version number and the branch table corre- 
sponding to the letter R. 


DW REPL sRy REPLACE 


Add the new lines shown in listing 6.16 to the end of the program. 


Listing 6.16. Rerlace one hex byte with another. 


y REPLACE HEX BYTE WITH ANOTHER 
» OVER GIVEN RANGE 
» FORMAT IS: START» STOP» ORIG: NEW 
y 
SBB4 CI7CSA REPL? CALL HLDEBC sRANGEs 1ST BYTE 
SBR7 DALLAS? Jc ERROR sNO 2ND 
SEBA 41 MOV BrC 91ST TO B 
SBBB ES FUSH H 
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SBRC CD9DS9 CALL READHL ¢2ND BYTE 
SBRF 40 MOV Col sINTO C 
SBCO E1 FOP H 

SBC1 7E REPL2: MOV A»M sFETCH BYTE 
SRC2 B8 CMP B 9A MATCH? 
SBC3 C2CCSB JNZ REPL3 y9NO 

SBC6é 71 MOV MrC sSUBSTITUTE 
SBC7 79 MOV ArC 

SBC8 BE CMF M 9 SAME? 

SBCY C2435A JNZ ERRE sNOy» BAD 
SBCC CLOOSA REPL3: CALL TSTOP > DONE? 

SRCF C3C1i5B JMP REPL2 


Assemble version 16 and try it out. Move three lines of the monitor’s 
code to a lower place using the M command. 


>M5800 S82F 4000 


Dump these three lines of memory with the D command. 


>D4000 402F 


Change every occurrence of the byte C3 found in those lines to a 40 hex 
using the command 


>R4000 402F C3 40 


Notice that a space must separate the two bytes C3 and 40. Now, dump this 
portion of memory with the command 


>D4000 402F 


The new byte is an ASCII “at” sign (@), therefore it will show up clearly on 
the ASCII portion of the dump. 

The replace routine can be useful for relocating a short executable 
program. Suppose that a routine is programmed for execution at 3000 hex. 
It can be moved to 4000 hex with the block-move command 


>M3000 3FFF 4000 


However, the program will not run at the new location if there are absolute 
jumps present. The high byte of each jump address will have to be changed 
from 30 to 40 in this case. The search routine can be used to find all occur- 
rences of 30 hex in the program. 


>S4000 4FFF 30 


Then the replace command can be given to convert each 30 hex into a 
40 hex. 


>R4000 4FFF 30 40 
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Another use for the replace command is to convert an assembly lan- 
guage source file from one format to another. For example, the CP/M 
format requires a line feed to follow a carriage return. But another assembler 
may generate lines in which only the carriage return is placed at the end of 
each line. In this case, the original file can be loaded into memory. Then, all 
of the carriage returns (OD hex) can be replaced with an ASCII character 
such as a # symbol (238 hex). 


>R100 38FF OD 23 


After the file is altered with the monitor, it can be saved on a disk. The final 
step can be performed with the system editor. The global replace command 
of this editor can be used to replace every occurrence of the # sign with a 
carriage-return/line-feed pair. With the Word-Master editor, the command 
would be 


KMR#SANSOTT 


The first step required the monitor because the system editors cannot 
be directed to globally change a carriage return to something else. The 
carriage-return/line-feed pair must be treated as a unit. 


VERSION 17: COMPARE TWO BLOCKS OF MEMORY 


This last addition to our system monitor will fill out the size to just under 
1K bytes. The new routine will allow us to compare two blocks of memory. 
If discrepancies are found, the address and the contents of the appropriate 
location in both blocks will be shown. Change the version number and the 
branch table corresponding to the letter R. 


DW VERM 5V 
Add the new lines shown in Listing 6.17. 


Listing 6.17. Compare two blocks of memory. 


+ GIVE RANGE OF 1ST BLOCK 
+ AND START OF SECOND 
, 


5BD2 CD7CSA VERM: CALL HLIERC $3 ADDRESSES 


SBDS OA VERM2: LDAX B sFETCH BYTE 

SBD6 BE CMF M 9SAME AS OTHER? 
SBD7 CAF35B JZ VERM3 sYES 

SBDA ES PUSH H sDIFFERENT 

SBDE CS PUSH B 

SBNC CDDCS9 CALL CRHL sPRINT 1ST POINTER 
SBDF 4E MOV CoM sFIRST BYTE 

SBEO CIE4S9 CALL OUTHEX ¢PRINT IT 


SBE3 3E3A MVI Ar’s’ 
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SBES 
SBE8 
SBE? 
SBEC 
SBED 
SBFO 
SBF1 
SBF2 
SBF3 
SBF6 
SBF7 


CD2A58 


C3D55B 


VERM3: 


CoM 
OUTHX 
Col 
BeH 
H 
TSTOP 
B 
VERM2 


The symbol table should now look like this. 


ADMP2 
ALOD2 
BACKUP 
CDATA 
COLn 
CRLF 
CTRQ 
DUMP 
DUMPS 
ERRP 
FILL3 
GETCH 
HLDERC 
IBUFF 


OUTS 
OUTHEX 
OUTSF 
PASCI 
RDHL4 
READHL 
REPL3 
SEARS 
SENDM 
TAB 
VERM 
WARM 


SB23 
OOF7 
SB4C 
oo11 
5806 
0010 
0013 
59948 
SAAS 
OO1B 
SA7S 
SA08 
SABA 
S7A3 
s8n5 
S8FR 


ADMP3 
AFOS 
BIT2 
CDATAO 
couT 
CSTAT 
CTRS 
DUMP2 
ERR2 
ESC 
FILL4 
GO 
HLDECK 
IBUFP 
INPL2 
INPLE 
INPUTT 
JUST 
LOAD 
LOADS 
MSIZE 
OPORT 
OUT4 
OUTHL 
OUTT 
PORTN 
RDOHLS 
REGS 
RESTRT 
SEAR4 
SIGNON 
TABLE 
VERM2 
ZERO 


*BreC TO Hol 
sSECOND POINTER 


s2ND BYTE 
sPRINT IT 


sRESTORE C 


sAND B 
SAND Hel 
* DONE? 


52ND POINTER 


ADMP4 
ASCII 
BITS 
CHEKM 
CR 
CSTATO 
CTRX 
DUMPS 
ERRB 
FILL 
GCHAR 
HEX1 
HMATH 
INC 
INPL3 
INPLI 
INSTAT 
JUST2 
LOAD2 
MOVDN 
NIB 
ORGIN 
OUTC 
OUTHX 
PASC2 
PUTIO 
RDHLD2 
REPL 
RETC 
SEARS 
STACK 
TOF 
VERM3 


SBO4 
SB2C 
SAO9 
5809 
S9DC 
0008 
OO7F 
SISE 
S9D4 
SA66 
5939 
S991 
S7AS 
S80c 
5919 
S8D0 
SB3n 
SB92 
SASS 
SAIS 
586A 
S82R 
5812 
SIES 
5983 
S9A2 
5986 
SBC1 
SAAD 
SAAA 
5800 
SA00 
3731 


ADUMP 
Ascs 
CALLS 
CIN 
CRHL 
CTRH 
DEL 
DUMP4 
ERROR 
FILL2 
GETC4 
HHLDE 
IBUFC 
INLN 
INPLE 
INPLN 
IPORT 
JUSTS 
LOADS 
MOVE 
NPAGE 
OUT2 
OUTH 
OUTLL 
PASCS3 
RDHL2 
RDHLDE 
REPL2 
SEAR2 
SEARCH 
START 
TSTOP 
VERS 


Try the new addition by first moving a copy of the monitor down to a lower 
memory location. 


>M5800 SBFF 4800 


Then verify that the two copies are the same. 
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>V¥5800 SBFF 4800 


Of course this step is not necessary, since there is a verification step included 
in the block-move routine. Change one byte in the new location so that 
there will be a difference. 


>L4820 
4820 . XX 0 <zero location 4820> 
+ 6 4X <auit> 


Then, give the verification command again. 


2>V¥5800 SBFF 4800 


Because you changed one byte of the copy, there should be an indication 
of error. 

This compare routine completes the 1K 8080 system monitor. We have 
incorporated many useful features into a minimum of space. We have care- 
fully distinguished program code from data code so that the monitor can be 
placed into ROM or PROM. 


AUTOMATIC EXECUTION OF THE MONITOR 


If you program the monitor into ROM, it will be ready to use each time the 
computer is turned on. On the other hand, you may want to copy it from 
disk into memory each time it is needed. We have been loading the monitor 
with the system debugger each time it is needed. But it is easier to include a 
short loader program at the beginning of the monitor. Then you can execute 
the monitor just by typing its name. 

A suitable loader program is given in Listing 6.18. Type the program 
into your editor. There are two locations that need to be matched to your 
monitor; these are the addresses of START and FINAL. START must corre- 
spond to the first address of your monitor. The address FINAL is the last 
address of the monitor. 


Listing 6.18. Loader rrogram to move the monitor. 


5800 = START EQU 5800H sMONITOR START 
SBFF = FINAL EQU SBFFH sMONITOR END 
A920 = OFFST EQu 120-START sLOAD OFFSET 
7 
0100 ORG 100H sSTART HERE 
, 
0100 210058 LXI H»eSTART #NEW START 
0103 012001 LXI By120H ¢OLD START 
0106 11FFSB LXI D» FINAL 
; 
0109 OA LOOP: LIIAX B sGET A BYTE 
O10A 77 MOV MrA 3TO NEW PLACE 


0O10B BE CMP M sDID IT GO? 
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010C C20000 JNZ t¢) sNOv QUIT 
O10F 23 INX H § INCREMENT 
0110 03 INX B § POINTERS 
0111 7B MOV ArE sDONE? 
0112 95 SUB L 
0113 7A MOV ArD 
0114 9C SBB H 
0115 020901 JNC LOOP sKEEP GOING 
0118 C30058 JMP START ¢ DONE 

, 
O11B END 


Assemble the loader program, then load it into memory with the debug- 
ger SID or DDT. 


A>DDT MOVE.HEX 


Next, place a copy of the monitor into memory starting at address 120 hex. 
If the monitor is already in memory, a copy can be generated with the moni- 
tor itself. DDT or SID can also be used for this task. The command is 


M5800 SBFF 120 


If the monitor resides on disk as a hex file, it can be loaded with the debug- 
ger after you calculate the offset. The offset is necessary since hex files are 
normally loaded at the operating address, but we want to put it somewhere 
else. 

The required offset should be given in the assembly listing of the 
loader program as the value of the equate OF FST. If your assembler doesn’t 
print such values, then use the debugger to calculate the value. 


H120 5800 <starting value of monitor> 
5920 A920 
<sum> <difference> 


Give the commands 


IMON17.HEX 
R<offset> 


so that the monitor will be loaded starting at address 120 hex. 
Return to the CP/M system 


GO <do to zero> 
and save the combination 


A>SAVE 5S MONITOR.COM 
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From now on, all you have to do is type the command 


A>MONITOR 


and the monitor will automatically start up. 

What actually happens is that the combination of the monitor and the 
loader program is first copied into memory at 100 hex. The move program 
relocates the monitor from address 120 hex to its proper place. Then control 
is transferred to the monitor. As each byte is moved to the new location, it 
is checked to see that it actually got there. If not, the process is terminated 
and control returns to CP/M. 

This short loader can be placed on the front of any program that must 
be relocated. Only the first two instructions may have to be changed to 
reflect the proper starting and ending addresses. 

In the next chapter, we will convert our monitor to Z-80 code. The 
Z-80 version will be smaller so that we can incorporate a few additional 
features and still be able to fit the program into 1K of ROM. The features in 
the next chapter can be incorporated in the 8080 version, but they will take 
so much space that the monitor will no longer fit into 1K bytes. 


CHAPTER SEVEN 


A Z-80 System Monitor 


The system monitor developed in Chapter 6 contains many features. Since 
the size is less than 1,024 bytes, it will easily fit into a 1K PROM, such as 
the 2708 EPROM. It can then be ready for use as soon as the computer is 
turned on. But, in this case, it may be necessary to include a routine to 
initialize the peripheral ports, such as those that handle the console and 
printer. In addition, you might want to send output to a printer as well as 
to the video console. If these two features are added to the monitor, the 
size will increase beyond 1K bytes and it will not fit into a single 1K PROM. 

One way to add these new features without increasing the monitor’s 
size is to remove some of the original routines. Another way, if you have a 
Z-80 CPU, is to convert some of the instructions to the more compact Z-80 
equivalent operations. The latter approach will be followed in this chapter. 
Listing 7.1 gives the final version with all changes discussed in this chapter. 
The symbol table at the end can be used to find the routines of interest. 


Listing 7.1 The Z-80 version of the system monitor. 
TITLE Z-80 SYSTEM MONITOR 


(Date sgoes here) 


FOUR SECTIONS HAVE BEEN REMOVED? 


VERS EQU toe (1 LINE) 
SIGNON? eee (4 LINES) 
LXI DySIGNON (2 LINES) 
SENDM: toe (6 LINES) 


ONE SECTION HAS BEEN ADDED: 
LIST OUFUT ROUTINES 


<a> “ED <Or <r er “E> “Er “er “er <a> er <a> 


0018 TOP EQU 24 sMEMORY TOP» K BYTES 
9800 ORGIN EQU (TOF-2)*1024 sPROGRAM START 
; 
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0000 
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ASEG sABSOLUTE CODE 
+Z80 
ORG ORGIN 
’ 
STACK EQU ORGIN-60H 
CSTAT EQU 10H sCONSOLE STATUS 
CATA EQU CSTAT+1 *#CONSOLE DATA 
INMSK EQU 1 sINFUT MASK 
OMSK EQU 2 sOUTPUT MASK 
LSTAT EQU 12H sLIST STATUS (18) 
LDATA EQuU LSTAT+1 sLIST DATA (18) 
LOMSK EQU 2 sOUTPUT MASK (18) 
NNULS EQu 4 sLIST NULLS (18) 
y 
FORTN EQU STACK §CONS=O0sLIST=1 
IBUFP EQU STACK+3 sBUFFER POINTER 
IBUFC EQU IBUFF+2 sBUFFER COUNT 
IBUFF EQU IBUFF+3 *INPUT BUFFER 
, 
CTRH EQU 8 9H BACKSPACE 
TAB EQU 9 hae | 
CTRF EQU 14 s“P (18) 
CTRQ EQU 17 s~Q 
CTRS EQU 19 aS 
CTRX EQU 24 9X» ABORT 
BACKUP EQU CTRH *>BACKUP CHAR 
DEL EQU 127 +RUBOUT 
AFOS EQU (39-’0’) AND OFFH 
CR EQU 13 yCARRIAGE RET 
LF EQU 10 sLINE FEED 
’ 
START? 

JP COLD sCOLD START 
RESTRT: JF WARM sWARM START 


y 
¢ VECTORS TO USEFUL ROUTINES 


COUT; JP OUTT sOUTPUT CHAR 
CIN: JP INPUTT #INPUT CHAR 
INLN: JP INPLN sINFUT LINE 
GCHAR: JP GETCH ¢GET CHAR 
OUTH: JF OUTHX sBIN TO HEX 


CONSOLE INFUT ROUTINE 
CHECK FOR CONTROL-P» LIST TOGGLE 


NPUTT: CALL INSTAT sCHECK STATUS 

JR ZeINFUTT #¢NOT READY 
INPUT2: IN A»y(CDATA) #GET BYTE 

AND DEL 

cP CTRX sABRORT? 

JR Z»START +#YES 

CP CTRF 9~P? 

JR Z*»SETLST sLIST 

RET 


GET CONSOLE-INFUT STATUS 


> > > 
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3827 
3829 
S82R 


10 
01 


37A0 


S7A0 
EO 


37A0 


1F 
5827 
10 
581A 
13 
F4 
5815 
11 
F9 
EE 


10 
02 


ES 


11 


INSTAT? IN 
AND 
RET 


ETLST: LD 


© «> «> «> 


UTT;: PUSH 


OUT2: CALL 


OUT33 CALL 


cm. ww 


OUT; CALL 
CALL 


- 


IN 

AND 
JR 

FOF 
OUT 
OUT 
AND 


<> > > 


OUTCR: LO 
OUTCR2: DEC 


ALD TIME DELAY AFTER 


Ar (CSTAT) 
INMSK 


TOGGLE LIST OUTPUT WITH 


Ay (PORTN) 


(FORTN) 2A 
INPUTT 


CONSOLE OUTPUT ROUTINE 


CONTROL-P 


sCHECK FLAG 
s INVERT 

9 SAVE 

sNEXT BYTE 


AF 
Avy (PORTN) sWHERE? 
a 9ZERO? 


NZ*sLOUT sLIST OUTPUT 
INSTAT sINFUT? 
ZrOUT4 #NO 

INFUT2 $GET INFUT 
CTRS sFREEZE? 
NZ,OUT2 »#NO 

INPUTT #¢INFUT? 

CTRQ sRESUME? 
NZ*sOUT3 §NO 


OUT2 


Av (CSTAT) 
OMSK 


(CDATA) 2A 


LIST OUTPUT ROUTINE 
SEND TO CONSOLE TOO 


INSTAT 
NZ, INPUT2 


Arv(LSTAT) 
OMSK 


(LIATA) 9A 
(CDATA) 2A 
7FH 


sGET STATUS 
sNOT READY 


ySEND DATA 


y INPUT? 
sYES» GET IT 


sCHECK STATUS 
*NOT READY 
sSEND DATA 


sCONSOLE TOO 
sMASK PARITY 


CARRIAGE RETURN 


CR sCARRIAGE RET? 
NZ +NO 

DE sUSE TlvE 

D»30 * NNULS 

E250 

E 

NZ*OUTCR2 + INNER LOOF 
0 


587A 
987C 
5870 


387E 


5881 
5883 
5885 
5887 
5889 
S88B 
58en 
S88E 


5891 
5894 


9895 
5898 
589A 
S89R 
589C 
5890 
S89E 
S8A0 
S8A1 
S8A2 
SBA 
S8AS 
SBAG 
S8A? 
S8AC 
SB8AF 


S8B2 
58B4 
S8R7 
S89 
S8BC 
S8BD 
58CO 
58C2 
58C3 


20 
D1 
C9 


31 


S7A0 


5891 


0000 
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JR NZ*OUTCR *sOUTER LOOP 
FOF DE sRESTORE 
RET 


CONTINUATION OF COLD START 
OLD: LD SP»STACK 


INITIALIZE I/0 FORTS 


sen er eo (“er er eo 


LD Ars 
OUT (CSTAT) 2A SRESET 
OUT (LSTAT) 9A 
LoD Av1SH 
OUT (CSTAT) 9A SET 
OUT (LSTAT) 2A 
XOR a *>GET A ZERO 
LD (PORTN) 2A #RESET 
, 
9 WARM-START ENTRY 
, 
WARM; LD HL»WARM sRET TO 
PUSH HL ¢ HERE 
FINI) TOF OF USABLE MEMORY. 


CHECK FIRST BYTE OF EACH PAGE OF MEMORY 
STARTING AT ADDRESS ZERO. STOF AT STACK 
OR MISSING/DEFECTIVE/FROTECTED MEMORY. 
DISPLAY HIGH BYTE OF MEMORY TOP. 


<a> “a> <a> “E> “er “er ~e> 


Lo HL»0 sPAGE ZERO 
LD ByHIGH STACK #STOP HERE 
NFAGES LD Avs(HL) #GET BYTE 
CPL > COMPLEMENT 
Lo (HL)»A §PUT IT BACK 
CP CHL) 9SAME? 
JR NZ»MSIZE #NO»v MEM TOP 
CPL sORIG BYTE 
LD (HL)»A F*RESTORE IT 
INC H yNEXT PAGE 
DINZ NPAGE *KEEF GOING 
MSIZE: LD CyrH sMEM TOP 
CALL CRLF *NEW LINE 
CALL OUTHX sPRINT MEM SIZE 
CALL INPLN sCONSOLE LINE 
CALL GETCH sFIRST CHAR 
’ 
¢ MAIN COMMAND FROCESSOR 
g 
SUB “AS sCONVERT OFFSET 
JP C»yERROR #§ < A 
CF ‘ZS -“AC HI 
JP NCvERROR ¢ > Z 
Ann AvA > DOUBLE 
LD HL»TABLE #START 
LD - Dvd 
Lo EvA sOF FSET 
ADD HL » DE sADD TO TABLE 
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S8C4 SE Lo Ex (HL) »#¢LOW BYTE 

S8CS 23 INC HL 

58C6 56 LD Dy (HL) ¢s¢HIGH BYTE 
58C7 EB EX DE» HL ¢INTO Hel 

58C8 E9 JP CHL) 9GO THERE 


COMMAND TABLE 


S8C9 SADZ ABLE: DW ASCII sAy DUMP ey LOAL 
S8CEB S9EO nw ERROR 5B 
S8CD SAIS DW CALLS Cy» SUBROUTINE 
S8CF S9SE DW DUMP *Dy DUMP 
S8D1 S9EO DW ERROR gE 
S8D3 SA64 DW FILL 9F» MEMORY 
S8D5 SA14 DW GO *Gry GO 
S807 SkES1 DW HMATH ¢H» HEX MATH 
S8D9 SE31 DW IFORT ¢Iy PORT INPUT 
S8DR SB60 Dw JUST 3Jr MEMORY TEST 
S8nn SIEO DW ERROR aK 
S8DF SA19 DW LOAD sLy LOAD 
S8E1 SA97 DW MOVE iM» MEMORY 
SBE3 SPYEO DW ERROR oN 
S8ES 5SB47 DW OPORT 9Or FORT OUTPUT 
S8E7 SIEO DW ERROR aP 
S8E9 SIEO DW ERROR *Q 
S8EB SB8C Dw REPL gRy REPLACE 
S8ED SAAD lw SEARCH #*S» MEMORY 
SSEF 59E0 DW ERROR iT 
S8F1 S9EO ' DW ERROR aU 
S8F3 SBA8 DW VERM *Vy VERIFY MEM 
S8F5 SEO Dw ERROR oW 
S8F7 SASS DW REGS 9X» STK PNTR 
S8F9 SIYEO Dw ERROR vY 
S8FB SASD DW ZERO 9Z» MEMORY 
, 
» INPUT A LINE FROM CONSOLE AND FUT IT 
¢ INTO THE BUFFER. CARRIAGE RETURN ENDS 
y THE LINE. RUBOUT OR “H CORRECTS LAST 
% LAST ENTRY. CONTROL-X RESTARTS LINE. 
» OTHER CONTROL CHARACTERS ARE IGNORED 
’ 
S8FD 3E 3E INPLN: LD Ay’>?’ 9PROMPT 
S8FF CD 5835 CALL OUTT 
5902 21 S7A6 INPL2: LOD HL» IBUFF #RUFFER ADDR 
5905 22 57A3 LD CIBUFP)*sHL #SAVE POINTER 
5908 OE 00 LD Cr0 > COUNT 
S90A Cl 5815 INPLI$ CALL INPUTT *sCONSOLE CHAR 
S90D FE 20 CF a sCONTROL? 
S9OF 38 18 JR CyINFLC +YES 
5911 FE 7F CP DEL *DELETE 
5913 28 2A JR ZyINPLB + YES 
5915 FE 5k CF ‘Z’ +1 sUPPER CASE? 
5917 38 02 JR CyINPL3 + YES 
9919 E6 SF AND SFH sMAKE UPPER 
S91B 77 INPL3: LD (HL)sA F¢INTO BUFFER 
591C 3E 20 LD Ar32 sBUFFER SIZE 
SY1E B9 CF Cc sFULL? 


S91F 28 E9 JR ZvINPLI 5YES» LOOP 


5921 
3922 
5923 
5924 


9927 


S929 
592B 
S920 
S92F 


5931 
5932 


S935 
5937 
SISA 
S93C 


S9SF 
5940 
S941 
5943 
5944 
S945 
5947 


S949 
594A 
5940 
5950 
5952 
5954 
S957 
5958 
S959 
S95C 
S9SD 


S9SE 
9961 
5964 
5965 
9968 
5969 


5835 
E1 


08 
12 
on 
ng 


S7AS 


C7 


08 
DE 


5999 
S9E8 


S9F8 


NPLC3 


ENT 


“a> “er er 


CO} ~e> > 


RLF? 


* 
, 
« 
, 
* 
, 
I 


NPLB? 


Gp > <> ar er 


ETCH: 


GETC4: 


<> <> <> 


DUMP: 
DUMP 23 
DUMPS: 


DUMF 


LD 
INC 
INC 
CALL 
JR 


CP 
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As (HL) 
HL 

c 
OUTT 
INPLI 


NZ*e INPLI 


OF INPUT LINE 


LD 
LD 


CARRIAGE-RETURN» 


A»C 


+GET CHAR 
sINCR POINTER 
sAND COUNT 
5SHOW CHAR 
+NEXT CHAR 


FROCESS CONTROL CHARACTER 


aH? 

sYES 
yRETURN? 
§NOv IGNORE 


9 COUNT 


CIBUFC)»A #SAVE 


ACR 
OUTT 
AyLF 
OUTT 


A»C 

A 
ZyINPLI 
HL 

c 


Avy BACKUP 


INPLE 


HL 


LINE-FEED ROUTINE 


*SEND CR 


sSEND LF 


DELETE FRIOR CHARACTER IF ANY 


sCHAR COUNT 

9ZERO? 

sYES 

sBACK POINTER 

sAND COUNT 
>CHARACTER 

+SEND 


GET A CHARACTER FROM CONSOLE BUFFER 
SET CARRY IF EMPTY 


sSAVE REGS 


HL» (IBUFF) sGET POINTER 
Ay CIBUFC) sAND COUNT 


1 


C»GETC4 


sDECR WITH CARRY 
¢NO MORE CHAR 


CIBUFC)»A #SAVE NEW COUNT 


Ay (HL) 
HL 


9GET CHARACTER 
¢INCR POINTER 


(CIBUFF)»sHL #AND SAVE 


HL 


sRESTORE REGS 


MEMORY IN HEXADECIMAL AND ASCII 


CALL 
CALL 
LD 
CALL 
INC 
Lo 


RDHLDE 
CRHL 


»RANGE 
yNEW LINE 
9GET BYTE 
sPRINT 
sPOINTER 
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SI6A 
S96C 
S96E 
5970 
S973 
S97S 
5978 
S979 
S97C 
S971 
SI7E 
9981 
5984 
5985 
5987 
5989 


598K 
S98C 
S98E 
5990 
S992 
5994 
S996 


S999 
S99C 
S99D 
SIGE 
S9OF 
SI9AO 
S9A2 


SIAS 
SPAS 
S9A8B 
SPAD 
SPAT 
S9AL 


S9AE 
SIAF 
S9BO 
SIRS 
S9BG 
S9BRS8 
SOBER 
S9BD 
SOBE 


7F 
04 
20 
02 
2E 


9835 


SIAS 


SE 


DUMF4 $ 


DUMPS: 


OFH 

Z» DUMP 4 
3 
Z»OUTSF 
DUMF3 
OUTSP 
DE 
DE»-10H 


OFH 


NZ» DUMPS 


DUMF'2 


sLINE END? 
¥YESy ASCIT 
9SPACE 

> 4 BYTES 
+NEXT HEX 


sRESET LINE 


sASCII DUMP 
+ DONE? 

9NO 

sLINE END? 
9NO 


DISPLAY MEMORY BYTE IN ASCII IF 


; 
5 
+ POSSIBLE» 
, 
F 


FASC23 
FASC3? 


‘> er 


CALL 
LO 


ROHLIDE ¢ 
RDHLD2: 


INPUT Hel AND 


Ive 


HLDE? CALL 


JR 


EADHL: PUSH 
FUSH 
LOI 

CALL 


JR 


ROHL 23 


OTHERWISE GIVE DECIMAL. 


Ay CHL) 
DEL 


NC»PASC2 


oo 


NC yPASC3 


Ay’,’ 
OUTT 


HHLDE 
AvE 

L 

AvD 

AvH 
C»ERROR 


DrE 


READHL 
Cy»ERROR 
DE y HL 
READHL 
DE» HL 


INFUT HyL FROM CONSOLE 


GETCH 
C»RDHLS 
NIB 
CyRDHL4 
HL » HL 
HL » HL 


PNT 


9GET BYTE 

sHIGH BIT ON? 
sYES 

sCONTROL CHAR? 
9NO 

sCHANGE TO NOT 
9SEND 


GET HyL AND DveE FROM CONSOLE 
CHECK THAT DvE IS LARGER 


gE - L 


st. - H 
sHol BIGGER 


sHel 

sONLY 1 ANDR 
¢SAVE IN DvE 
SDE 

sPUT BACK 


§SAVE REGS 
+CLEAR 

+GET CHAR 
sLINE END 
9TO BINARY 
sNOT HEX 
ySHIFT LEFT 
> FOUR 


SOBF 
99CO 
S9C1 
S9C2 
59C3 


s9CS 
S9C7 
S9C9 
S9CB 
S9CcD 
S9CE 
S9CF 


S9DO 
S9n2 
S9D3 
S905 
S9D6 
S9D7 
SoD? 
SIDA 
S9DER 
s9pn 
S9DF 


SVEO 
SPE2 
S9ES 


S9E8 


S9EB 
SIEC 
S9EF 


S9FO 


SIFS 


SOFS 


cp 


cD 


3E 
C3 


EE 


30 


17 


OA 


07 


OA 


SF 
5835 
5800 


5935 


“S9F8 


S9FS8 


CHECK 


we «ww 


DHL4: 


RDHLS? 


ze 


IB; 


PRINT 


{T] «> «> <> 


RROR: 


START 


RHL ¢ 


PRINT 


ser cer er () ~e> o> er 


OUTHL 


OUTLL? 


UTHEX: 


© a> «> «> O er a> 


UTSP: 


se> er ar “er 
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ADI HL » HL ¢ BYTES 

ADD HL » HL 

OR L sADD NEW CHAR 
LD Lyra 

JR RDHL2 §NEXT 


FOR COMMA OR BLANK AT END 


CF APOS 9 APOSTROPHE 
JR Z»RDHLS ¢ASCII INPUT 
CF (’ ’-0") AND OFFH 
JR NZ»ERROR *#NOT BLANK 
POF BC 

POF DE sRESTORE 

RET 


CONVERT ASCII CHARACTERS TO BINARY 


SUE °0’ sASCII BIAS 
RET c 5 <0 

CP “FC-/ O41 

CCF 9 INVERT 

RET Cc sERROR: > F 
CP 10 

CCF s INVERT 

RET NC sNUMBER 0-9 
SUB “AL H49l M1 

CP 10 sREMOVE 3- 
RET sLETTER A-F 


? ON IMPROPER INPUT 


LD Ar’?! 
CALL OUTT 
JP START +TRY AGAIN 


NEW LINE» GIVE ADDRESS 


CALL CRLF sNEW LINE 
HyL IN HEX 

LD CyH 

CALL OUTHX oH 

LD Col 


OUTFUT HEX BYTE FROM C AND A SPACE 


CALL OUTHX 


OUTFUT A SFACE 


LD Ay’ ¢ 
JF OUTT 


OUTFUT A HEX BYTE FROM C 
BINARY TO ASCII HEX CONVERSION 
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S9FS8 
SOF? 
SOFA 
S9OFB 
S9FC 
S9FD 
SA00 
SAO1 
SA03 
SAO0S 
SA06 
SA08 
SA09 


SAOC 
SAOD 
SADE 
SAOF 
SA10 
SA11 
SA12 
SA13 


SA14 
SA15 
5A18 


79 
1F 


El 


E9 


SAO1 


OF 
90 


40 


5835 


S9AE 


SIAE 
SIEB 
598B 
S9FS 


S9FO 


5902 
SPAE 


OUTHX: LD ArC 
RRA sROTATE 
RRA ¢ FOUR 
RRA ’ BITS TO 
RRA + RIGHT 
CALL HEX1 sUPPER CHAR 
Lo ArC sLOWER CHAR 
HEX13 AND OFH sTAKE 4 BITS 
ADD Ar90OH 
DAA sDAA TRICK 
ADC A» 40H 
DAA 
JP OUTT 


CHECK FOR END> Het MINUS DeE 
INCREMENT Hel 


, 
, 
, 
, 
T 


STOF3 INC HL 
LD AvE 
SUB L pj E-L 
LD Ard 
SBC ArH ’>D- 4H 
RET NC sNOT DIONE 
POP HL sRAISE STACK 
RET 


, 

» ROUTINE TO GO ANYWHERE IN MEMORY 
’ FOR CALL ENTRY» ADDRESS OF WARM 
» IS ON STACK» SO A SIMPLE RET 

> WILL RETURN TO THIS MONITOR 

, 


GO; FOP HL sRAISE STACK 
CALLS: CALL READHL #GET ADDRESS 
JP CHL) *>GO THERE 


LOAD HEX OR ASCII CHAR INTO MEMORY 
FROM CONSOLE. CHECK TO SEE IF 

THE DATA ACTUALLY GOT THERE 
AFOSTROPHE PRECEEDS ASCII CHAR 
CARRIAGE RET PASSES OVER LOCATION 


<e> > “a> <a> eo eo er 


LOAD: CALL READHL s#ADDRESS 

LOAD2: CALL OUTHL sPRINT IT 
CALL FASCI sASCIT 
CALL OUTSP 


Lo Cy(HL) sORIG BYTE 
CALL OUTHEX sHEX 
FUSH HL sSAVE PNTR 


POP HL 

CP APOS 

JR Z»LOADS #ASCII INPUT 
LD ArC sHOW MANY? 
OR A sNONE? 

JR Z»yLOAD3 s+YES 


SA46 


bc 


S949 


F4 


LOAN4: CALL 

LOADS: INC 
JR 

, 

> LOAD 

, 

LOADS: CALL 
LD 
JR 


C3 a> > o> > 


ANI 

HEKM: LOD 
LD 
CP 
RET 

ERRF POF 

ERRB; LD 
CALL 
CALL 
JP 

, 

¢ DISPLAY STACK 

, 

REGS: LD 
ADD 
JP 


Ni > -e> 


ERO: CALL 
LD 


JR 


“T] <> ~a> o> 


ILL? 


FILL23 


FILL3: 


rs 


, 
FILL43 


LDOERC? CALL 
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CHEKM 
HL 
LOAD2 


ASCII CHARACTER 


GETCH 
BrA 
LOAD4 


(HL) +B 
Ay (HL) 
B 

Z 

AF 

Ar ‘B’ 
OUTT 
OUTSP 
OUTHL 


FOINTER 


HL 90 
HL » SF 
OUTHL 


RDHLDE 
B»0 
FILL2 
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sINTO MEMORY 
*POINTER 


COPY BYTE FROM EB TO MEMORY 
SEE THAT IT GOT THERE 


sPUT IN MEM 
sGET BACK 

+ SAME? 

90K 

sRAISE STACK 
>BAD 


sPOINTER 


REGISTER 


ZERO A PORTION OF MEMORY 


> RANGE 


FILL A FORTION OF MEMORY 


HLDEBC sRANGE» BYTE 
AFOS + APOSTROPHE? 
Z*sFILL4 ¢YESs ASCII 
BC 

AvH sFILL BYTE 
HIGH STACK #TOO FAR? 
NC*sERROR sYES 
CHEKM sPUT» CHECK 
TSTOP > DONE? 

FILL2 sNEXT 

GETCH sASCII CHAR 
BrA 

FILL3 


GET Hel DvE AND BoC 


HLDECK 
Cyr ERROR 


9 RANGE 
yNO BYTE 
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5A87 
SABA 
SA8B 
SABC 
sAsn 


SABE 
SAP1 
SAI4 


SA97 
JAIA 
SASTI 
SAAO 
SAAIL 


SAAS 
SAA4 
SAAS 
SAAG 
SAA7 
SAAB 
SAA? 
SAAA 


SAAD 
SABO 
SAB2 
SAB4 
SABS 
SAB8 
SABI 
SABA 
SABRB 
SABC 
SABE 
SABF 
SACO 
sAC2 


SAC4 
SACS 
SACS 


SPAE 


SIAS 
SEO 
S99C 


SABO 
SAAS 
SAOC 


F7 


SA4A 


SABO 
on 
06 


S9AE 


10 


on 
04 


06 


GET 2 


LDECK: 


MOVE 


MOVE: 
MOVDN? 


a 


MOVIN? 


“a> <a> a> “a> <e> ser <a> 


CALL 


READHL 
BsH 
Col 

HL 


ADDRESSES» CHECK 
ADDITIONAL DATA IS INCLUDED 


CALL 
JP 
JF 


HHLDE 
CrERROR 
RDHLD2 


*3RD INFUT 
s#MOVE TO 
¢ Bel 


THAT 


72 ADDR 
sTHAT’S ALL 
9 CHECK 


A BLOCK OF MEMORY HeoL-DvE TO Bro 


CALL 
CALL 
CALL 


HLDEBC 
MOVIN 
TSTOF 
BC 
MOVIN 


Ay (HL) 
(BC) 2A 
Ay (BC) 
(HL) 

Z 

HyB 
L»C 
ERRP 


53 ADDR 
§MOVE/CHECK 
> DONE? 

>NO 


+BYTE 

yNEW LOCATION 
+ CHECK 

9IS IT THERE? 
sYES 

sERROR 

sINTO Hol 
*SHOW BAD 


SEARCH FOR 1 OR 2 BYTES OVER THE 

BYTES ARE IN BoC 

R HAS CARRIAGE RETURN IF ONLY ONE BYTE 
FUT SPACE BTWEEN BYTES IF TWO 

T$ START STOP BYTE1 BYTE2 


RANGE Hel DvE. 


FORMA 


SEARCH: 
SEAR2? 


SEARS: 


“> er a> 


- 


FOUND 


CALL 
Ln 
JR 
FUSH 
CALL 
Lo 
FOF 
LoD 
CF 
JR 
INC 
Lp 
CP 
JR 


FIRST MATCH» 


LD 
CP 
JR 


HLDEBC 
BrCR 


NZ» SEAR4 


CR 
Z»SEARS 


Ay CHL) 
B 
NZ»SEAR4 


sRANGEs 1ST BYTE 
sSET FOR 1 BYTE 


yONLY ONE 
s2ND BYTE 
sINTO C 
sGET BYTE 
sMATCH? 
9NO 
sYES 
sONLY 17? 
sYES 


CHECK FOR SECOND 


sNEXT BYTE 
sMATCH? 
9NO 
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SAC8 2B SEARS: DEC HL ¢A MATCH 
SAC? CS PUSH BC 
SACA CD S9E8B CALL CRHL *SHOW ADDR 
SACD C1 FOP BC 
SACE CD SAOC SEAR4: CALL TSTOPF > DONE? 
SAD1 18 E7 JR SEARS ¢NO 
5 
¢ ASCII SUB-COMMAND FROCESSOR 
9 
SAD3 CD 5949 ASCII: CALL GETCH sNEXT CHAR 
SAD6é FE 44 CF ‘ri’ sDISFLAY 
SAD8 28 24 JR Z»ADUMP 
SADA FE 53 CF °S’ sSEARCH 
SADC 28 42 JR Z»ASCS 
SADE FE 4C CP a ad *LOAL 
SAEO C2 S9EO JP NZ*sERROR 
y 
¢ LOAD ASCII CHARACTERS INTO MEMORY 
¢ QUIT ON CONTROL-X 
; : 
SAE3 CD S9AE CALL READHL *sADDRESS 
SAES CD S9EB CALL OUTHL sPRINT IT 
SAE9 Ch 5815 ALOD2: CALL INPUTT #NEXT CHAR 
SAEC CI 5835 CALL OUTT sFRINT IT 
SAEF 47 Lo BrA 9 SAVE 
SAFO CD SA46 CALL CHEKM ¢INTO MEMORY 
SAF3 23 INC HL sPOINTER 
SAF4 70 LD ArL 
SAFS E& 7F AND 7FH sLINE END? 
SAF7 20 FO JR NZ»ALOD2 $NO 
SAF? CD S9YE8 CALL CRHL sNEW LINE 
SAFC 18 EB JR ALOD2 
y 
> DISPLAY MEMORY IN STRAIGHT ASCII. 
§ KEEP CARRIAGE RETURN»s LINE FEED» CHANGE 
+ TAB TO SPACE» REMOVE OTHER CONTROL CHAR. 
, 
SAFE CD 5999 ADUMP3 CALL RDHLDE s#RANGE 
SBO1 7E ADMF2: LOD Av(HL) #¢GET BYTE 
SBO2 FE 7F CP DEL sHIGH BIT ON? 
SB04 30 15 JR NCvADMF4 $s YES 
SRO6 FE 20 CF eee ¥CONTROL? 
SBO8 30 OE JR NC»ADMFPS +NO 
SBOA FE OD CP CR sCARR RET? 
SBOC 28 OA JR Z»ADMF3 ¢YES» OK 
SBOE FE OA CP LF sLINE FEED? 
SB10 28 06 JR Zr»ADMP3 *#YES» OK 
SB12 FE 09 CP TAB 
SB14 20 05 JR NZ»ADMF4 ¢SKIFP OTHER 
9B16 3E 20 LD Ar’ ¢ sSFACE FOR TAB 
5B18 CD S835 ADMF3: CALL OUTT *SEND 
SB1iB CD SAOC ADMP4: CALL TSTOP > DONE? 
SB1E 18 Et JR ADMP2 »NO 


‘o> “a> “er er <> 


SEARCH FOR 1 OR 2 


ASCII CHARACTERS 


NO SPACE BETWEEN ASCII CHARS 


FORMAT? 


START STOF 1 OR 2 ASCII CHAR 
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SB20 CD S999 ~ASCS3 CALL RDHLDE *RANGE 


SB23 CD 5949 CALL GETCH sFIRST CHAR 

SB26 4F LD Cra 

SB27 CD 5949 CALL GETCH s2ND OR CARR RET 
SB2A DA SABO JP CrSEAR2 sONLY ONE CHAR 
SB20 47 Lo BvA 72ND 

SB2E C3 SABA JP SEARS 


INPUT FROM ANY FORT (Z-80 VERSION) 


FORT: CALL READHL #PORT 


SB34 4D LD CooL sPORT TOC 
SB35 ED 68 IN Ly (C) 9 INFUT 
SB37 CD S9EF CALL OUTLL sHEX VALUE 


; 
> FRINT L REGISTER IN BINARY (Z-80 VER) 


SB3A 06 08 BITS: LD Br8 98 BITS 

SB3C CB 25 BIT23 SLA L sSHIFT L LEFT 
SB3E 3E 18 Li Ay’0’°/2 *#HALF OF O 
SB40 8F ADC ArA * DOUBLE+CARRY 
SB41 CD S835 CALL OUTT yPRINT BIT 
59B44 10 F6é DINZ BIT2 98 TIMES 

SB46 C9 RET 


OUTPUT BYTE FROM PORT (Z-80 VERSION) 
FORMAT IS? O»PORT* BYTE 


© «> > «> «> 


SB47 CD S9AE FORT: CALL READHL s¢PORT 


SB4A 40 LD Col 

SB4B CI! S9AE CALL READHL s#DATA 
SR4E ED 69 OUT (Cook sOUTPUT 
SBS0 C9 RET 


, 
» HEXADECIMAL MATH» SUM AND DIFFERENCE 
; 
H 


SBS1 Clie S9AZ MATH: CALL HHLDE >TWO NUMBERS 


9BS4 ES FUSH HL ySAVE Hel 
SBS5 19 ADL HL» DE *SUM 

SB56 CD S9ER CALL OUTHL sPRINT IT 
SBS9 E1 FOP HL 

SESA B7 OR A sCLEAR CARRY 
SBSB ED 52 SBC HL » DE . 
SBSD C3 S9EB JF OUTHL sDIFFERENCE 


MEMORY TEST THAT DOESN’T ALTER CURRENT RYTE 
INPUT RANGE OF ADDRESSES» ABORT WITH “XxX 


Co we ee we ee 


SB60 CD 5999 UST? CALL ROUHLDE *RANGE 


SB63 ES FUSH HL *SAVE START ADDR 
SB64 7E JuST2: LOD AyCHL) ¥#GET BYTE 

SB465 2F CPL sCOMPLEMENT IT 
SB466 77 LD (HL)»A ¢FUT IT BACK 
SB67 BE CF (HL) *DID IT GO? 

5B68 C2 SB7E JP NZ» JERR #NO 

SB6B 2F CPL sORIGINAL BYTE 
SB6C 77 LD CHL)»,A = FPUT IT BACK 


SR6D 
SB6E 
SB6F 
5B70 
SB71 
SB72 


5B74 
SB77 
SB7A 
SB7B 
SB7C 


SB7E 
SB7F 
SB82 
SB83 
9B84 
SB8S 
SB8S6 
SB89 
SB8A 


SBR8C 
SE8F 
SR92 
SB9S 
JE94 
SB97 
SB98 
SB9D 
SEPA 
SBIB 
SB9D 
SB9IE 
SBOF 
SBAO 
SBA 
SBA6 


SBAS8 
SBAB 
SBAC 
SBRAD 
SBAF 
SBRO 


FO 


3827 
5815 


E6 


S9EB 


SBSA 


El 


SA80 
SIEO 


S9AE 


06 


SA4B 
SAOC 
Fi 


SA80 


19 
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JUST3: LO ArL sPASS 
SUB E 9 COMPLETED? 
LD AvyH 
SBC ArD 
INC HL 
JR C»JUST2 §NO 
y 
» AFTER EACH FASS» 
> SEE IF ABORT WANTED 
’ 
CALL INSTAT s¢INFUT? 
CALL NZ» INPUTT $YES» GET IT 
FOP HL sSTART ADDR 
FUSH HL ySAVE AGAIN 
JR JUST2 sNEXT PASS 
, 
¢ FOUND MEMORY ERROR» FRINT POINTER AND 
¢ BIT MAF$ O=GOOD» 1=BAD BIT 
y 
JERR: PUSH AF sSAVE COMPLEMENT 
CALL CRHL sFRINT POINTER 
FOP AF 
XOR CHL) sSET BAD BITS 
FUSH HL sSAVE FOINTER 
LD LyA +BIT MAF TOL 
CALL BITS yPRINT BINARY 
FOP HL 
JR JUST3 > CONTINUE 
y 
¢ REPLACE HEX BYTE WITH ANOTHER 
§ FORMAT IS! START» STOP» ORIG» NEW 
’ 
REPL? CALL HLDEBC #RANGEy 1ST BYTE 
JP C»yERROR #NO 2ND 
Lo BrC 91ST TO B 
FUSH HL 
CALL READHL #2ND BYTE 
Lo CoL sINTO C 
FOP HL 
REPL2: LOD AyCHL) s¢FETCH BYTE 
CF B ¢A MATCH? 
JR NZ*REPL3 ¢NO 
Lo (HL)»C #SUBSTITUTE 
LoD ArC 
CF CHL) 3 SAME? 
JF NZ»ERRBE #NOyv BAD 
REPL3: CALL TSTOF > DONE? 
JR REFL2 . 
y 
9 GIVE RANGE OF 1ST BLOCK AND START OF SECOND 
y 
VERM: CALL HLDEBC #3 ADDRESSES 
VERM2: LD Avy (BC) s¢FETCH BYTE 
CF CHL) sSAME AS OTHER? 
JR Z*»VERM3 *YES 
FUSH HL + DIFFERENT 
FUSH BC 
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SBB1 Cn 
SBR4 4E 
SBBS Ci 
SBR8 3E 
SBBA CI 
SBBD E1 
SBBE CI 
SBC1 4E 
SRC2 CD 
SBCS 4D 
SBC6& 44 
SBC7 El 
SBC8 CI 
SECR 03 
SBCC 18 


Symbols? 


ADMF2 
ALOL2 
BRACKUF 
CLATA 
COUT 

CSTAT 
CTRS 

DUMF 2 
ERRB 

FILL2 
GETC4 
HHL DE 
IBUFC 
INMSK 
INPLC 
INFUT2 
JERR 

LDATA 
LOADS 
LOUT 

MOVIN 
NF AGE 
OUT2 

OUTCR2 
OUTHX 
FASC2 
ROHL 2 
ROHLIE 
REFL2 
SEARS 
SETLST 
TABLE 
VERM2 


SAOC 


1) 


SBO1 
SAEY 
0008 
0011 
5806 
0010 
0013 
5961 
SA4E 
SA6C 
S95C 
SIAS 
S7AS 
0001 
3929 
S81A 
SB7E 
0013 
SASD 
S85B 
SAAS 
589A 
983C 
9876 
S9F8 
SI94 
S9B3 
S999 
SB99 
SABA 
S82C 
58C9 
SBAB 


VERM3; 


= 


ADMP3 
AFOS 
BIT2 
CHEKM 
CR 
CTRH 
CTRX 
DUMF3 
ERROR 
FILL3 
GETCH 
HLDEBC 
I BUFF 
INPL2 
INFLE 
INFUTT 


CALL 
LD 


5B18 
FFF? 
SB3C 
SA4S6 
ooon 
0008 
0018 
5964 
SIYEO 
SA72 
S949 
SABO 
S7AG6 
9902 
5924 
5815 
SB60 
000A 
SASA 
0012 
S8AS 
0002 
5848 
5812 
S9EF 
S996 
S9CS 
SIAE 
SBA3 
SACE 
S7A0 
0018 
SBC8 


INPL3 
INPLI 
INSTAT 
JUST? 
Loan 
LOADS 
MOVIN 
NIB 

OF ORT 
ouT4 
OUTHEX 
OUTSF 
PASCI 
RDHLS 
REGS 
RESTRT 
SEARS 
START 
TSTOF 
WARM 


sFPRINT 1ST FOINTER 
sFIRST BYTE 
sPRINT IT 


*ByC TO Hel 
sSECOND POINTER 
92ND BYTE 
sPRINT IT 
*RESTORE C 

SAND B 

sAND Hol 

+ DONE? 

¢2ND FOINTER 


SB1B 
SADS 
SB3A 
5809 
SVE8 
0010 
OO7F 
S975 
SA4A 
SA7A 
SA14 
SABE 
S7AZ 
S91B 
S9OA 
9827 
SB64 
SA19 
SA40 
GAIA 
S9D0 
SB47 
9851 
S9FO 
S9FS 
5S98B 
S9CD 
SASS 
3803 
SAC8 
3800 
SAOC 
S891 


ALUMF 
ASCS 
CALLS 
COLn 
CRLF 
CTRQ 
DUMF 
DUMPS 
FILL 
GCHAR 
HEX1 
HMATH 
INLN 
INPLE 
INPLN 
IPORT 
JUSTS 
LOAD2 
LOMSK 
MOVE 
NNULS 
ORGIN 
OUTCR 
OUTHL 
OUTT 
FORTN 
RDHLD2 
REPL 
SEAR2 
SEARCH 
TAB 
VERM 
ZERO 


SAFE 
5B20 
SAILS 
S87E 
5935 
0011 
SISE 
SITE 
5A64 
S80F 
SAO01 
SBS1 
S80C 
SOSF 
S8FD 
SBS1 
SB60 
SAIC 
0002 
SA97 
0004 
5800 
5874 
S9EB 
9835 
S7AO 
S99C 
SB8C 
SABO 
SAAT 
0009 
SRAB 
SASD 
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CONVERSION OF THE MONITOR TO Z-80 MNEMONICS 


If you used 8080 mnemonics to program the monitor in Chapter 6, you can 
now convert it to Z-80 mnemonics. The form of the mnemonics depends on 
the type of assembler you have. The Microsoft assembler accepts both the 
Intel 8080 and the Zilog Z-80 mnemonics. Since most other assemblers use 
only one or the other, you may need a second assembler. 

The Digital Research assembler MAC requires the 8080 mnemonics, but 
it can generate Z-80 code with an accompanying macro library. The Xitan 
assembler utilizes 8080 mnemonics for the common set of 8080-type instruc- 
tions and Zilog-like instructions for the others. 

First, make a working copy of the monitor using PIP, a CP/M utility 
routine. 


PIP MONZ.-ASM=MON17.ASMCVI 


If you are using MAC or the Xitan assembler, skip to the next section. Other- 
wise, use the system editor to make the necessary changes to the new file. 
The conversion can be easily performed with the global substitute command 
of the Word-Master or the CP/M editor. For example, the 8080 mnemonic 


MoV ArM 


can be changed to the equivalent Z-80 mnemonic 


LD Ay CHL) 


with the command 


XSMOV<tab>ArMSLD<tab>Ay (HL) SOTT 


The $ symbols indicate that the escape key is pressed. The ‘“‘tab’’ refers to 
the ASCII tab key, a control-I. You may find the cross-reference list for 8080 
and Z-80 mnemonics, given in Appendix G, helpful in the conversion process. 

After changing the monitor to Z-80 mnemonics, assemble it and care- 
fully check the assembly listing to see that the hex code is correct. The Z-80 
version at this time should generate the same hex code as the 8080 version. 
A further check can be made with the monitor’s V command. Load the 
binary code into memory with an offset. A command of 


DDT 
IMONZ HEX 
RFOOO 


will load the new version 4K bytes below the regular monitor position. 
Branch to the monitor prepared in the last chapter. Then compare its code 
to the new version using the verify command. If there is a discrepancy, find 
the error and correct it. When you are convinced that the Z-80 version pro- 
duces the same code as the 8080 version, you can begin the alterations to 
reduce the monitor’s size. 


144 8080/Z-80 ASSEMBLY LANGUAGE 


REDUCING THE MONITOR SIZE 


In this section you will reduce the monitor size by converting many of the 
3-byte absolute jump instructions into 2-byte relative jump instructions. 
This change will make room for additional features. There are five types of 
jumps to be changed. 


absolute relative condition 
Jump JumP 

JP x JR x unconditional 
JP ZX JR Z»X zero 

JP NZ 9X JR NZX not zero 

JP C»X JR CX carry 

JP NC +X JR NC +X not carry 


Not all of the absolute jumps can be converted in this way since the relative 
jumps are limited to a distance of about 126 bytes. 

Another way to obtain more space is to move some of the subroutines 
to more advantageous locations. This will allow a few more absolute jumps 
to be converted into relative jumps. For example, several routines contain a 
jump to the routine ERROR. These can be placed together in a group. Then 
the ERROR routine can be moved into the middle of the group. 

Another change will free up three more bytes. Notice that subroutine 
OUTSP ends with the instruction 


JP OUTT 


If this subroutine were located directly ahead of subroutine OUTT, then the 
jump instruction would not be necessary. Actually, this type of change has 
already been used extensively in our monitor. Subroutines CRHL, OUTHL, 
OUTHEX, and OUTSP are all directly related. They initially could have been 
programmed (using Z-80 mnemonics) as 


CRHL: CALL CRLF 
CALL OUTHL 


RET 

5 

OUTHL: LD CoH 
CALL OUTHX 

OUTLL’$ LD Col 
CALL OUTHEX 
RET 


5 
QUTHEX? CALL OUTHX 
CALL OUTSP 


RET 

3 

OUTSP: LD Ar’ ¢ 
CALL OUTT 
RET 
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The CALL/RET combination at the end of each routine can be replaced by 
a JP instruction. Then, since the calling program is located directly above 
the called program, the jump instruction becomes unnecessary. Thus, four 
bytes are saved in each of the first three routines. Furthermore, if this entire 
block of four subroutines were located just prior to subroutine OUTT, we 
could eliminate the final JP OUTT instruction and save three more bytes. 

While this kind of subroutine rearrangement can be used to make the 
overall program smaller, there is a penalty. The readability is reduced. We 
have traded comprehension for space. This may not, in general, be a worth- 
while tradeoff for assembly-language programming. Such programs are more 
difficult to understand than those written in a high-level language such as 
Pascal or BASIC. Furthermore, assembly-language programs are typically 
much shorter than they would be if written in a higher-level language. But if 
packing a maximum number of features into a 1K PROM is your goal, then 
this technique may be worth it. 


GETTING MORE FREE SPACE 
The two instructions 


DEC B 
JP NZ9X 


which generate four bytes of code appear in two places. Replace them with 
the 2-byte instruction 


DINZ X 


One location is just prior to the label MSIZE (address 58A5 in Listing 7.1) 
and the other is in subroutine BITS (5B3A). This change will free four 
more bytes. 

The 16-bit subtraction routine in HMATH (5B51) has been improved. 
The sequence of instructions 


LD AsyL 
SUB AvE 
LD LrA 
LD AvH 
SBC Art 
LD Hy»A 


is replaced by the shorter, double-precision subtraction: 


OR A sreset carry 
SEC HL » DE ssudtract 


Three more bytes are freed by this change. 
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Since the Z-80 contains a set of instructions for direct rotation of data 
in the general CPU registers, we can simplify subroutine BITS. In the 8080 
version, the three instructions 


MOV Ark 
AnD A 
MOV LyeA 


are used to move the data from a general register to the accumulator, perform 
the shift, then move it back. The 2-byte, Z-80 arithmetic shift left instruction 


SLA L 


performs the shift directly in the L register. 

The 8080 can output a byte only from the accumulator, and can input 
a byte only to the accumulator. Furthermore, the address of the peripheral 
must be located in memory immediately following the first byte of the input 
or output instruction. 

The port-input routine IPORT and the port-output routine OPORT in 
the system monitor utilized subroutine PUTIO. This routine writes the 
desired IN or OUT instruction in memory, the requested port address and 
then a return instruction. There is a Z-80 instruction that can perform I/O 
from any register. The address of the peripheral is located in register C in 
this case. Since the port address does not have to be located in memory, 
subroutine PUTIO can be eliminated. The resulting Z-80 code is 19 bytes 
shorter than the 8080 version. See Listing 7.1 for the new versions of IPORT 
(5B31) and OPORT (5B47). 

Since you are nearly finished with the development of the monitor 
program, you can gain some more space by removing the routines that print 
the version number. There are four areas involved. First, delete the line near 
the beginning that identifies the version number. 


VERS EQU t4a7t 


Second, remove four lines starting with the label SIGNON. Third, delete the 
two lines starting on the line after the label COLD. 


Lo DE»ySIGNON 
CALL SENDM 


Fourth, remove the entire subroutine SENDM, but keep a copy of it in case 
you want to incorporate it in another program. 


PERIPHERAL PORT INITIALIZATION 


There are two schools of thought on peripheral port initialization. One 
approach is to initialize ports only on a cold start or a warm start. The other 


- A Z-80 SYSTEM MONITOR 147 


way is to initialize a port each time it is used. The method you use depends 
on the integrity of your system. 

The approach taken in this chapter initializes ports only on a cold start. 
The instructions are placed just after the label COLD. In anticipation of 
adding a printer-output routine, we include the initialization for two sepa- 
rate peripherals. 

Ports which need initialization utilize a control register for this pur- 
pose. The address of the control register is the same as the status register. A 
CPU IN instruction reads the status register, while a CPU OUT instruction 
to the same address writes into the control register. A typical initialization 
procedure requires two OUT instructions. The first is used to reset the port; 
the second is used to set the desired options. The values shown in the listing 
correspond to a Motorola 6850 ACIA serial port set for eight data bits, one 
stop bit, and no interrupts. 


LO Ar3 

OUT (CSTAT) 2A 9 RESET 

LD A»v15H 

OUT (CSTAT) 2A ¢ SET FEATURES 


PRINTER OUTPUT ROUTINES 


Up to this point, we have been writing programs for output to a console 
video screen. We output an ASCII backspace character for error correction so 
that the cursor will actually back up on the screen. We also included a pair 
of scroll commands: control-S to freeze the display and control-Q to resume 
the scrolling. 

Sometimes, however, we want computer output we can look at after 
the computer has been shut off. A printer or list device is what we need for 
this purpose. We will not want to use the printer as a main console, though, 
because it is too slow. 

For sophisticated operating systems like CP/M, the software for the list 
device is wholly separate. For example, we can divert a disk file to the printer 
and none of the system commands will appear on the listing. 

Our approach will be a little different. The video console will always 
display all output whether the printer is on or not. Of course, when the 
printer is engaged, the console speed will be reduced to that of the printer. 
We will both enable and disable the printer with a control-P command, just 
as in CP/M. We refer to the control-P command as a list toggle: the same 
command turns it on or off. The output includes the echoing of the com- 
mands typed in from the console keyboard. 

Both the input and output routines will have to be changed if you want 
to incorporate the printer routines. In addition, two new subroutines will 
be added. First, add two new lines to the input routine; they will look for a 
control-P from the console keyboard. If a control-P is found, the program 
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will branch to a new subroutine called SETLST. The two new lines appear in 
subroutine INPUTT (5815). 


CP CTRP g4P 
JR Z»SETLST sLIST 


Subroutine SETLST (582C), containing 4 lines of code, is added just 
after subroutine INSTAT. 


SETLST? LD Avy (PORTN) sCHECK FLAG 
CPL s INVERT 
LD (PORTN) 2A $SAVE 
JR INPUTT sNEXT RYTE 


This routine complements the printer flag (PORTN) when a control-P is 
typed. The output routine uses this flag to determine whether to send out- 
put to the printer. Notice that in Chapter 6, the identifier PORTN was used 
to set up the port number for the I and O commands. This feature is not 
needed for the Z-80 version, so we can use the location for the printer flag 
instead. 

The third new section is placed in the output routine OUTT (5835). 


LD Ay (PORTN) sSWHERE? 
OR A §ZERO? 
JR NZ»LOUT sLIST OUTPUT 


This part checks the flag PORTN to see if output is to be sent to the printer. 

The fourth routine is LOUT (585B); it follows OUT4. This routine 
sends output to both the console and the printer. It first checks the status 
port for the printer. When the output bit indicates ready, a byte is sent to 
the printer. Since the console video screen operates so much faster than the 
printer, there is no need to check the console-ready flag. The byte is there- 
fore also sent directly to the console by the next instruction. The output 
appears simultaneously at both devices. 


DELAY AFTER A CARRIAGE RETURN 


Video screens operate with electron beams that move very fast. Mechanical 
printers, on the other hand, are much slower. For some printers, the time it 
takes to execute a carriage return is so great that the first few characters of 
the next line may be lost. The solution is to have the computer do something 
else for a little while after it sends a carriage return. 

One method of slowing down the computer is to arrange for it to send 
binary zeros, called nulls, after each carriage return or carriage-return/line- 
feed pair. One routine for accomplishing this is as follows. 


A Z-80 SYSTEM MONITOR 149 


CRLF? LD AsCR sCARRIAGE RET 
CALL OUTT sSEND 
Lo A»LF sLINE FEED 
CALL OUuTT sSEND 
XOR A *GET A NULL 
CALL OUTT sSEND IT 
CALL OUTT 9A SECOND ONE 
CALL OUTT sA THIRD 
JP OUTT §THE FOURTH 


But this approach may cause trouble if the printer circuits attempt to inter- 
pret the null characters. 

A different approach is taken with the list-output routine, LOUT, 
shown in Listing 7.1. After each carriage return is sent, the computer starts 
executing a double loop. The inner loop is executed 250 times. The outer 
loop is set according to the equivalent number of nulls that are needed. No 
nulls are actually sent, though, in this case. 

The disadvantage of this method is that the resultant deli time is a 
function of the computer speed. A Z-80 running at 4 MHz would require 
approximately twice the number of loops as would a 2-MHz Z-80. Thus, the 
loop-initialization values may have to be adjusted to the particular computer. 

Be careful to tailor the port-initialization routines to your system or 
remove them if they are not needed. The time delay in the list-output rou- 
tine should also be removed if it is not needed. If you are not sure whether 
a delay is necessary, then leave it in, at least for the first version. Then use 
the memory load command of the monitor itself to reduce the delay values 
on the two loops. When you reduce the delay time to too small a value, then 
you will notice that some of the characters are missing from the beginning of 
some of the lines. 

A sample loop-change session could look like this. 


>DS870 S87F 

9870 CODS1678 1EFAID20 1520. . . 
+L3873 

S873 x 78 3C 

S873 . 1E AX (to auit) 


The first command line is used to display the memory region containing the 
loop constants. Then the outer loop value of 78 hex is changed to 8C hex 
which is half the value. As long as you change the timing-loop values with 
the printer disengaged, no problem should occur. After each change in the 
timing loops, re-engage the printer with a control-P. Display several lines on 
the printer by giving the D command. Check to see if any of the first few 
characters of each line are missing. If everything is all right, then again 
reduce the loop constant until characters are lost. (Be sure to disengage the 
printer between each change.) 


CHAPTER EIGHT 


Number-Base Conversion 


This chapter deals with assembly language routines that can be used to 
convert data from one form to another. The first part deals with the conver- 
sion of a sequence of ASCII characters called a string into a binary number. 
The second part reverses the procedure; binary numbers are converted into 
ASCII strings. The characters in each string represent digits in one of the 
common bases 2, 8, 10, or 16. The corresponding binary number may be 
4 bits, 8 bits, or 16 bits in size. 

All of the programs in this chapter are designed to run with the system 
monitor developed in Chapters 6 and 7. Some of the monitor’s input and 
output facilities are needed. These include the console input buffer which 
supplies the characters, the binary-to-hexadecimal conversion routine which 
will print the answer in hexadecimal, and the console output routine needed 
for the error message. 

The monitor error-correction features are available during input. Press- 
ing the DEL (or RUB) key or the backspace (control-H) key will delete the 
previously typed character and remove it from the console video screen. If 
the list routines have been incorporated into the monitor, the printer can be 
turned on by typing a control-P. When you have finished with each routine, 
you can return to the monitor simply by typing a control-X. 


THE ASCII CODE 


When a key is pressed on a computer terminal, a unique signal is sent to the 
computer. There are several, very different ways of electronically encoding 
this signal. ASCII, which stands for American Standard Code for Informa- 
tion Interchange, is the most commonly used code. Appendix A gives the 
128 ASCII characters with the corresponding values expressed in decimal, 
hexadecimal, octal, and binary. EBCDIC, which is used by IBM, is another 
coding technique. 
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The ASCII table can be divided into four parts. Part 1 of the table 
contains the nonprinting control characters. Part 2 contains most of the 
special characters such as $, %, and #, and the digits 0-9. The uppercase 
letters are found in part 3, and the lowercase letters are found in part 4. 

Computer terminals typically have a keyboard that looks like a type- 
writer. There is a shift key to change from lowercase letters to uppercase 
letters. In addition to the shift key, there will usually be a control key. This 
key will give the letter keys a third meaning. Thus the user can enter a 
lowercase letter A, an uppercase letter A (a shift A), or a control-A. The bit 
patterns are: 


110 0001 lowercase A 
100 0001 uppercase A 
000 0001 control-A 


It can be seen from the pattern that the shift key resets bit 5 while the con- 
trol key resets both bits 5 and 6. 

Some of the commonly used control functions such as the carriage 
return (control-M), line feed (control-J), the horizontal tab (control-I), and 
the backspace (control-H) may have their own separate keys. 

All console input to the computer will be in the form of ASCII char- 
acters. The console will send eight data bits for each character. But the 
ASCII code contains only seven bits per character. Consequently, the eighth, 
high-order bit is not needed. The user will need to have routines for convert- 
ing strings of ASCII characters into the ultimate numbers that will reside in 
memory. For example, if the operator enters the string 


3014 
from the console, the computer would actually receive the bit patterns 


011 0111 (ASCII 3) 
011 0000 (ASCII 0) 
011 0001 (ASCII 1) 
011 0100 (ASCII 4) 


The next step is to convert the string into a 16-bit number. The conversion 
scheme that is chosen depends on whether the string represents a decimal 
number, an octal number, or a hexadecimal number. 

Additionally, a check is made to ensure that each character in the string 
is within the proper range. For example, octal numbers must contain only 
the digits zero through 7. The digits 8 and 9, the letters A through Z, and the 
other characters are not used. Finally, we may need a special character, 
called a delimiter, to indicate the end of a string. We will use a space or a 
carriage return for this purpose. Thus the string of characters 


1034 2347 
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will .be interpreted as two separate numbers since a space appears in the 
middle. 

The ASCII string may need to be converted into a 4-bit nibble, an 8-bit 
byte destined for a CPU register, or a 16-bit word meant for a double register. 
Furthermore, the format may be either free entry or fixed entry. The choice 
is a matter of personal taste. With free entry, leading zeros are not needed. 
The entries 


are all interpreted as the same number. An additional feature is that you can 
recover from an error by retyping the entry on the same line. Suppose that 
the 4-digit number 1035 is desired but 1045 was typed by mistake. The 
correct value can be immediately typed without a space. 


10351045 
If two 4-digit numbers are needed, they must be separated by a delimiter. 
1045 1055 


With the fixed-entry format, the required number of digits, including leading 
zeros, must be entered. But since an end-of-string indicator is not needed, 
two numbers can be run together. The fixed-entry expression 


10451055 


will be interpreted as two separate numbers. 


CONVERSION OF ASCII-ENCODED BINARY CHARACTERS 
TO AN 8-BIT BINARY NUMBER IN REGISTER C 


One of the simplest base-conversion routines is the ASCII-to-binary pro- 
gram. This program takes a string of ASCII-encoded ones and zeros from the 
console input buffer and produces an 8-bit binary number in register C. The 
hexadecimal equivalent of the number is printed on the console. If the 
operator types the string 


10101100 


the keyboard actually transmits the following sequence. 
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011 0001 
011 0000 
011 0001 
011 0000 
011 0001 
011 0001 
011 0000 
011 0000 


The conversion routine will take this combination, convert it to the binary 
number 


10101100 


and place it into the C register. 

Type the routine shown in Listing 8.1 Set the assembly location some- 
where below the monitor’s stack and include the address of the monitor 
using the EQU directive. The monitor I/O routines are defined relative to 
the monitor’s address. 


Listing 8.1. ASCII-encoded binary to binary in C. 


THIS FROGRAM IS DESIGNED TO OPERATE 
WITH THE SYSTEM MONITOR AT S800 HEX. 


a 
y 
a 
, 
a 
y 
a 
y 
a 


JAN 29% 80 
y 
5000 ORG SOOOH 
y 
3800 = MONIT EQU 3800H 
3806 = OUTT EQU MONIT+6 
S80C = INPLN EQU MONIT+0CH 
S80F = GETCH EQU MONIT+OFH 
9812 = OUTHX EQU MONIT+12H 
, 
5000 SEOD START: MVI AvODH *CARR RET 
9002 ChO658 CALL OUTT 
5005 3EOA MVI AyOAH sLINE FEED 
5007 ClhOé658 CALL OUTT 
SOOA ChOCS8 CALL INFLN 9GET A LINE 
S0oD Cl1ESO CALL BBIN 9 CONVERT 
9010 CD1i258 CALL OUTHX yHEX VALUE 
9013 3E20 MVI Ay’ ¢ 
5015 Cho0é58 CALL OUTT 
y 
¢ THE NEXT INSTRUCTION IS NEEDED WHEN 
+ THE ROUTINE IN LISTING 8.9 IS APPENDED 
, CALL BITS *BIN TO ASCII 
$018 C30050 JMF START gNEXT VALUE 


SUBROUTINE TO CONVERT UF TO 8 ASCII- 
ENCODED BINARY CHARACTERS INTO AN 
8-BIT BINARY NUMBER IN C 


se> <a> a> <a> ver 
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SOIR ES BBIN: FUSH H ySAVE REGS 
901C 210000 LXI HrO yCLEAR 

SO1F CHOFSS BBIN2: CALL GETCH *GET CHAR 
5022 LIASASO Jc BBIN3 sLINE END 
5025 1630 SUI ‘0’ »CONV TO BINARY 
5027 DA35S0 Jc BRIN4 > <0 

502A FEO2 CFI 2 

§02C 023050 JNC ERROR a | 

S02F 29 DAD H +SHIFT LEFT 
5030 BS ORA L yALDT! NEW CHAR 
5031 6F MOV LyrA 

5032 C31FS50 JMF BBIN2 yNEXT 


CHECK FOR BLANK AT END 


, 
, 
, 
B 


3035 FEFO BIN4? CPI (% %=-/0"°) AND OFFH 
5037 C23050 JNZ ERROR yNOT BLANK 
SO3A 401 BBIN3: MOV Col 98 BITS TO C 
SO3B El FOF H sRESTORE 
S03C C9 RET 


FRINT ? ON IMPROPER INFUT 


mew <« 


RROR: FOF B sRAISE STACK 


SO3D Ci 

SOSE C1 FOP B 

SO3F 3E3F MVI Ar’?! 

5041 ChO658 CALL OUTT 

9044 C30050 JMP START yTRY AGAIN 


Assemble the program and load it into memory; start it up by branch- 
ing to the beginning of the program, the address of START. The monitor 
prompt symbol of > will appear on the console. Test the routine by entering 
the following binary numbers. Be sure to add a carriage return to the end of 
each line. 


+0 (you type this) 
00 (Program responds with this) 


02 (binary 10 is hexadecimal 2) 


05 (binary 101 is hexadecimal 5) 
>1111 

OF 

>11110000 

FO 

*10101010 

AA 


Of course, only ASCII zeros and ones are acceptable binary characters. 
Leading zeros are not necessary. If more than eight characters are entered, 
only the last eight are used. A question mark will be printed if a nonbinary 
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character is typed. Typing errors can be corrected with a backspace or 
DEL keys. 

The program consists of three parts. The first and third parts will be 
common to other conversion programs in this chapter. The first part calls 
the monitor to obtain data from the console. The last part converts the data 
to the hexadecimal equivalent and prints it on the console if valid. If the 
entry is invalid, a question mark is printed. 

The conversion routine occupies the middle portion of the program. It 
works as follows: Since HL is used as a working register, the original con- 
tents are first saved on the stack. While this step is not necessary in this case, 
it may be needed in a real application. The HL register is then zeroed. 

As each new character is obtained from the input buffer, it is converted 
from ASCII to binary by subtracting 30 hex, the value of the ASCII zero. 
An ASCII zero, which has a value 30 hex, becomes a binary zero. Similarly, 
an ASCII 1, which has a value of 31 hex, becomes a binary 1. 


011 0000 ASCII zero 
011 0000 subtract ASCII zero 


000 0000 binary zero 


011 0001 ASCII 1 
011 0000 subtract ASCII zero 


000 0001 binary i 


A check is made at this point to ensure that an invalid character has not 
been typed. Only three characters are acceptable: An ASCII zero, an ASCII 
1, and a space. If the carry flag is set after the subtraction of an ASCII zero, 
then the input value was neither a zero nor a 1. But it might be a space 
character. A jump is made to subroutine BBIN4 in this case. This routine 
determines whether the current character is a space or some other character. 
A space is the normal end-of-string character (delimiter); other characters 
are not. 

Each character is also checked to see that it is not greater than an 
ASCII 1. In either case, if any character in the string is found to be other 
than an ASCII zero or 1, then the subroutine is terminated with a jump to 
the error routine. At this point, the stack is raised with a POP instruction, 
and control returns to START at the top of the program. 

If the input value is a zero or 1, the procedure continues. The current 
value in the HL register is multiplied by two, the binary number base. This 
arithmetic shift left is accomplished by adding the HL register to itself with 
the double-precision add DAD H. An alternate method would be to place 
the sum in the accumulator. In this case the multiplication is performed with 
an ADD A instruction. But then the intermediate sum would have to be 
saved in another register while the new character was checked. 

The new character, which is now a binary zero or 1 in the accumulator, 
is added to the value in HL. The addition of the 8-bit accumulator to the 
16-bit HL register generally requires several steps. 
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1. Add Lto A. 


2. Move sum in A to L. 
3. Increment H if carry is set. 


But in this particular case, the carry flag will never be set. Consequently, a 
simpler method of addition can be used. The one chosen for this application 
is to perform a logical OR operation with the L register and the accumulator. 


We frequently find it useful to input computer data in the form of decimal 
numbers. We may then need a program to convert ASCII-encoded decimal 
numbers into binary form. The program given in Listing 8.2 will perform 
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this task for us. 


Listing 8.2. 


5000 


5800 
5806 
580C 
S80F 


9812 


5000 
53002 
5005 
5007 
SOOA 
soon 
5010 
so11 
9014 
9015 
9018 
sO1A 


soit 


Hou WH i 


cn1258 
40 
C1258 
3E20 
CD0658 


C30050 


5020 0S 


5021 210000 


TO A BINARY NUMBER 


7 
GQ 


se> OO > er er wer > 


MONIT 
OUTT 

INPLN 
GETCH 
OUTHX 


A 
START? 


‘> a> > “> 


cy > er er 


BIN? 


JAN 22% 80 


S0O00OH 


EQU 
EQU 
EQU 
EQU 
EQU 


MVI 
CALL 
MVI 
CALL 
CALL 
CALL 
MOV 
CALL 
MOV 
CALL 
MVI 
CALL 


CALL 
JMP 


PUSH 


LXI 


ASCII decimal to binary in HL. 


THIS FROGRAM IS DESIGNED TO OFERATE 
WITH THE SYSTEM MONITOR AT S800 HEX 


5S800H 

MONIT+S 

MONIT+0CH 

MONIT+OFH 

MONIT+12H 

A, ODH sCARR RET 
OUTT 

A» OAH yLINE FEED 
OUTT 

INPLN 9GET A LINE 
DEIN sASCII TO DEC 
CrH +HIGH HALF 
OUTHX 

Cel 

OUTHX *>LOW HALF 
Ar’ ¢ 9SPACE 

OUTT 


BIND 
START 


u 
HO 


THE NEXT INSTRUCTION IS NEEDED WHEN 
THE ROUTINE IN LISTING 8.11 IS USED 


+BIN/DECIMAL 
yNEXT VALUE 


ASCII DECIMAL TO 146-BIT IN Heol 


sSAVE REGS 
sCLEAR 


5024 
5027 
502A 
902C 
SO02F 
5031 
5034 
$035 SII 
5036 29 
5037 29 
9038 
5039 29 
SO3A SF 
S03B 
503D 
SO3E 


5041 
5043 
5046 
9047 


5048 
9049 
504A 
504C 
SO4F 


CDOFS8 
DA4650 
D430 
TA4150 
FEOA 
D24850 


DBIN2: 


Ch0é658 
C30050 


FOR 


CFI 
JNZ 
FOP 
RET 
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EvA 
D0 
D 
DBIN2 


BLANK AT END 


*GET CHAR 

yLINE END 

sCONV TO BINARY 
> 2 0 


> > 10 
sCOPY Hol 
¢ INTO DeE 
yTIMES 2 
sTIMES 4 
*TIMES 3S 
sTIMES 10 
gNEW BYTE 


sADD NEW BYTE 
¢NEXT 


(4 *-'0"%) AND OFFH 


ERROR 
1) 


sNOT BLANK 
sRESTORE 


? ON IMPROPER INFUT 


POP 
POP 
MVI 
CALL 
JMP 


H 
H 
Ar’ ?’ 
OUTT 
START 


+RESTORE 
+STACK 


sTRY AGAIN 
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This new program uses our monitor for some of the necessary sub- 
routines, just like the ASCII binary-to-binary program given in the previous 
section. Assemble the program, load it into memory, and branch to START. 
Again, the monitor prompt symbol > will appear. Try this routine by 
entering the following decimal numbers. Remember to type a carriage 
return at the end of each line. 


(you tyre this) 


(computer resronse) 


(decimal 10) 
(sives OA hex) 
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If the input consists of valid decimal characters, then the response will be 
the corresponding hexadecimal value. If an invalid character is typed, a 
question mark is printed as an error message and the program is restarted. 

Since this routine generates a 16-bit binary number, the largest possible 
value is one less than 2 to the power 16. This is equivalent to a decimal 
number of 65,545. If a larger number than this is entered, the excess over 
65,545 is lost. Thus, an input of 65547 will give a value of 0002. Remember 
that the monitor error-correction features and the control-P list toggle are 
available. 

The algorithm is similar to the one in the previous section. The HL 
register pair is initially zeroed. The incoming character is converted from 
ASCII to binary, then checked to see that it is in the range 0-9. The current 
value is multiplied by 10 (the number base) prior to adding in the new 
character. The multiplication is accomplished with the double-register add 
instructions as follows. 


MOV D»yH (durlicate H in D) 
MOV ErvL (duplicate E in L) 


DAD H (double initial value) 
DAD H (quadruple it) 

DAD bi) (5 times initial value) 
DAL H (double, making 10 times 


the initial value) 


The total is first duplicated in the DE register. Two double-precision DAD H 
operations multiply the original value by 4. Adding in the original value with 
the DAD D makes it 5. A final DAD H produces the desired multiplication 
by 10. 

If only an 8-bit binary number is needed, then the multiplication can 
be performed in the accumulator rather than in the HL register. This will 
free the HL register for some other use, such as a memory pointer. The 8-bit 
version is given in Listing 8.3 


Listing 8.3. ASCII decimal to binary in C 


+ THIS FROGRAM IS DESIGNED TO OPERATE 
y WITH THE SYSTEM MONITOR AT 5800 HEX 


, 
¥ JAN 12% 80 
, 


5000 ORG SO0OH 
, 
5800 = MONIT EQU S800H 
5806 = OUTT EQU MONITtS 
S80C = INPLN EQU MONIT+OCH 
S80F = GETCH EQU MONIT+OFH 
9812 = OUTHX EQU MONIT+12H 
, 
5000 3E0D START? MMVI A,yODH sCARR RET 
5002 ChOé58 CALL OUTT 
5005 3E0A MVI AyOAH sLINE FEED 


9007 ChOé58 CALL OUTT 
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SO00A CHOCS8 CALL INFLN sGET A LINE 
soon Chié650 CALL DBIN *DEC TO BIN 
5010 C1258 CALL OUTHX +s HEX 

5013 C30050 JMF START 


CONVERT ASCII-DECIMAL TO 8-BIT BINARY 


<a> er ser 


3016 OE00 DBINS MVI C0 *CLEAR C 
9018 CDOFSS8 DBIN2: CALL GETCH *GET CHAR 
S01B 18 RC sLINE END 
501C 1630 SUI “0° sCONY TO BINARY 
SO1E DA3250 Jc DNBINA y 2 0 

5021 FEOA CFI 10 

9023 D23850 JNC ERROR , > 10 
5026 S37 MOV DvA *SAVE NEW 
S027 79 MOV ArC 9SUM 

5028 87 Ang A +TIMES 2 
5029 4F MOV Cra 9 SAVE 

502A 87 ADD a *TIMES 4 
502B 87 ADD A sTIMES 8 
SsO2C 81 Ang c #TIMES 10 
So02n 82 Ann 0 > COMBINE 
SO2E 4F MOV CyrA 9SAVE IN C 
SO2F C31850 JMF DNBIN2 >NEXT 


CHECK FOR BLANK AT END 


‘o> > “er 


5032 FEFO DBIN4S? CRI (“ %=/0') AND OFFH 
5034 C23850 JNZ ERROR *NOT BLANK 
5037 C9 RET 
§ PRINT ? ON IMPROPER INFUT 
, 
5038 Fi ERROR: FOP FSW sRESTORE 
5039 3E3F MVI Ar’?! 
SO3B CDO658 CALL OUTT 
SO3E C30050 JMP START yTRY AGAIN 
, 
5041 ENT 


CONVERSION OF ASCII HEXADECIMAL CHARACTERS 
TO A 16-BIT BINARY NUMBER IN HL 


The development of a routine to convert a string of ASCII-encoded hexa- 
decimal characters into a 16-bit binary number will now be considered. This 
is the routine most frequently used in a system monitor. In fact, this was one 
of the first routines to be incorporated into our system monitor. Somewhere 
along the way there will have to be a multiplication by 16, since this is the 
base of the hexadecimal number. The multiplication can be easily performed 
by shifting the results left by four bits. Shifting left one bit is equivalent to 
multiplying by 2. Consequently, shifting by two bits performs a multiplica- 
tion by 4. 

For the binary routine we considered first, only the characters 1 and 
zero were valid. In the decimal routine that followed, the range of valid 


160 8080/Z-80 ASSEMBLY LANGUAGE 


input was zero to 9. The hexadecimal routine we will now consider is com- 
plicated by the fact that both the digits 0-9 and the letters A-F are valid. 

Two separate algorithms will be considered; one produces an 8-bit 
result, the other gives a 16-bit result. The program given in Listing 8.4 is 
similar to the previous ones. It will convert a string of ASCII-encoded hex 
characters into a 16-bit binary number in the H,L register pair. The double- 
precision add, DAD H, is used four times to perform the multiplication 
by 16. 


Listing 8.4. ASCII hex to binary in HL. 


THIS FROGRAM IS DESIGNED TO OFERATE 
WITH THE SYSTEM MONITOR AT S800 HEX 


<> “ar a> <a> er 


JAN 18,7 80 

5000 ORG SOOOH 

, 
9800 = MONIT EQU S800H 
5806 = OUTT EQU MONIT+4 
S80C = INPLN EQU MONIT+0CH 
S80F = GETCH EQU MONIT+OFH 
9812 = OUTHX EQU MONIT+12H 

, 
S000 3E0D START: MVI A,yODH *CARR RET 
5002 ChOé6S3 CALL OUTT 
5300S 3EOA MVI ArQAH sLINE FEED 
3007 ChO0é6S58 CALL OUTT 
SOOA CHOCSS CALL INFLN +GET A LINE 
Soon Cnh2150 CALL READHL sCONVERT 
9010 4C MOV CyH 
9011 Ch1258 CALL OUTHX ¥HIGH HALF 
9014 40 MOV Col 
5015 Chi258 CALL OUTHX yLOW HALF 
5018 3E20 MVI Ar’ ¢ +SPACE 
SO1A CLO658 CALL OUTT 
soit 7C MOV ArH sHIGH BYTE 

, 

y THE NEXT INSTRUCTION IS NEEDED 

> WHEN LISTING 8.10 IS APPENDED 

, CALL hecs 9H IN DECIMAL 
SOLE C30050 JMF START yNEXT VALUE 

y 

» READ UP TO 4 ASCII HEX DIGITS FROM 

» CONSOLE ANI CONVERT TO 16~-BIT 

’ BINARY NUMBER IN Hol 

, 
5021 210000 READHL: LXI H»0 yCLEAR 
5024 CHOFS8 ROHL2: CALL GETCH *GET CHAR 
5027 D8 RC sLINE END 
9028 CI3ES0O CALL NIB *TO BINARY 
502B DA3750 Jc RDHL4 »NOT HEX 
SO2E 29 DAD H *TIMES 2 
S02F 29 NAD H *TIMES 4 
3030 29 BAD H *TIMES 8 
5031 29 DAD H +TIMES 16 


————— 
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S032 BS ORA L sNEW CHAR 
9033 6F MOV LyA 
3034 €32450 JMF ROHL2 §NEXT 
¢ CHECK FOR BLANK AT END 
y 
5037 FEFO ROHL4: CFI (% ¢=/0°) ANID OF FH 
5039 CO RNZ 
SO3A El FOP H sRAISE STACK 
503Kk C34C50 JMF ERROR 
, 
3 CONVERT ASCII CHARACTERS TO BINARY 
, 
SO3E 11630 NIB: SUI ‘OQ’ ASCII BIAS 
5040 18 RC y= 0 
5041 FE17 CFI “FSO 41 
5043 3F CMC sy INVERT 
5044 18 RC sERRORy = F 
5045 FEOA CFI 10 
5047 3F CMC s INVERT 
5048 Do RNC sNUMRBER 0-9 
S049 [1607 SUI “ALH49' m1 
S048 C9 RET sLETTER A-F 
’ 
+ PRINT ? ON IMPROPER INFUT 
’ 
5S04C 3E3F ERROR: MVI Ay’ ?’ 
SO4E ChO658 CALL OUTT 
S0S1 C30050 JMF START #TRY AGAIN 


Each ASCII character is converted to binary in subroutine NIB. This 
routine subtracts an ASCII zero, then checks to see that the character is 
valid. If it was originally in the range of an ASCII zero to ASCII 9, it will 
now be converted to the binary number 0-9. If a hex character A-F was 
entered, it will be converted to binary form by the additional subtraction of 
7. Of course, nonhex characters will produce the error message of a question 
mark. 

Assemble the program, load it into memory, and start it up. Type the 
following series of hex numbers. 


>1 

0001 

>10 

0010 

>A 

OO0A 

>FFFF 

FFFF 

212345 

2345 (only last 4 characters used) 


As with the other programs, leading zeros are not needed. If more than four 
characters are input, only the last four are used. Return to the monitor with 
a control-X. 
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CONVERSION OF TWO ASCII HEXADECIMAL CHARACTERS 
TO AN 8-BIT BINARY NUMBER IN REGISTER C 


In the previous section, HL was used to convert hex characters into a binary 
number. But, if the HL register pair is needed as a memory pointer, then the 
accumulator can be used for this conversion. In this case, however, only an 
8-bit binary number is produced. Listing 8.5 gives this version. Since the 
routine uses a fixed format, exactly two characters must be typed. This 
means that leading zeros must be entered. 


Listing 8.5. ASCII hex to 8-bit binary C. 


¢ THIS PROGRAM IS DESIGNED TO OPERATE 
WITH THE SYSTEM MONITOR AT S800 HEX 


JAN 22 80 


<> «> > > 


5000 ORG SO00H 
, 
5800 = MONIT EQU 5S800H 
5806 = OUTT EQU MONIT+46 
S80C = INPLN EQU MONIT+0CH 
S80F = GETCH EQu MONIT+OFH 
’ 
¢ REMOVE NEXT LINE WHEN LISTING 8.12 ADDED 
sOUTHX EQU MONIT+12H 
, 
5000 3E0D START? MVI Av ODH *CARR RET 
3002 CDO658 CALL OUTT 
5005 3E0A MVI Av OAH sLINE FEED 
9007 CD0658 CALL OUuUTT 
S00A CBOCS8 CALL INPLN sGET A LINE 
S0OD CD14650 CALL RDHEX sASCII TO HEX 
5010 CD4350 CALL OUTHX ¢BIN TO HEX 
5013 C30050 JMP START 


CONVERT 2 ASCII-HEX CHARACTERS TO 
AN 8-BIT BINARY NUMBER IN C 


Zl a> «> «> «> 


5016 CD2450 DHEX: CALL HEX2 sLEFT CHAR 


5019 87 ADD A sTIMES 2 
SO1A 87 ADD A sTIMES 4 
501B 87 ADD a sTIMES 8 
5S01C 87 ADD A sTIMES 16 
SO1D 4F MOV CvA § SAVE 

SO1E CD2450 CALL HEX2 *RIGHT CHAR 
5021 Bi ORA c 3 COMBINE 
5022 4F MOV CrA 

5023 C9 RET 


5024 CDOFS8 CALL GETCH sHEX CHAR 


CONVERT ASCII CHARACTERS TO BINARY 


or > er TT ee 
m 
x< 
tN 
oe 
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5027 11630 SUI °0" sASCII BIAS 
5029 DA3950 Jc ERROR 7 2 0 

S02C FE17 CPI “F4~/O% +1 

SO2ZE DN23950 JNC ERROR yERRORs > F 
53031 FEOA CFI 10 

5033 D8 RC +NUMBER 0-9 
5034 Dé07 SUI ALS Ged 

5036 FEOA CPI 10 

9038 DO RNC sLETTER A-F 


FRINT ? ON IMPROPER INPUT 


fT] <> «> ~~ 


5039 Fi RROR: POP FSW sRAISE STACK 
SO3A Fi FOP PSW 

S03B 3E3F MVI Ar’?! 

S03D CD0é658 CALL OUTT 

5040 C30050 JMF START yTRY AGAIN 


The multiplication by 16 is performed in the accumulator by using four 
ADD A instructions. The ADD A instruction is equivalent to an arithmetic 
shift left. Data is moved from the lower four bits to the upper four, and fills 
the lower bits with zero. 

Assemble the program shown in the listing, load it into memory, and 
try it out. Remember, for this version, exactly two hex characters must be 
entered. 


If everything is all right, return to the monitor with a control-X. 


CONVERSION OF ASCII OCTAL CHARACTERS 
TO A 16-BIT BINARY NUMBER IN REGISTER HL 


We did not use octal operations in the system monitor developed in Chapter 
6, yet they can be very useful in trying to understand 8080 assembly lan- 
guage instructions. From the 8080 instruction set in Appendix D, it can be 
seen that the registers are assigned values as shown in the following table. 
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register value 
0 B 
1 Cc 
2 D 
3 E 
4 H 
5 L 
6 memory 
i) A 


Thus the register-move operations are obvious from the octal representation, 
but not from the hex or decimal form. 


octal hex decimal oreration 
101 41 65 MOV Bol 
123 53 83 MOV I[lvE 
167 77 119 MOV) MsA 


While octal numbers appear to be better than hexadecimal for express- 
ing the 8080 operation codes, they leave something to be desired as memory 
pointers. The problem is that 16-bit addresses must be considered as two 
8-bit bytes. But octal numbers represent groupings of three bits, and 8 is not 
evenly divisible by 3. An address of FFFF hex is equivalent to 177777 octal. 
But if this address is stored in two consecutive bytes, each byte will contain 
FF hex or 377 octal. This peculiarity of octal has given rise to the expres- 
sion ‘‘crazy octal.”’ A value of FFFF hex is 377:377 crazy octal. 


hex octal crazy octal 
FF 377 0003377 

FFF 7777 =0172377 

7FFF 77777 =1773377 


FFFF 177777 3778377 


Assemble the program, load it into memory, and try it out. The octal 
numbers input to this routine can be in the range of 0 to 177777. Try 
various octal numbers. 


>0 

0000 
>10 
0008 
>20 
0010 
+177 
O00O7F 
2377 
OOFF 
>400 
0100 
2123456 
A72E 
>200000 (too big) 
0000 


—————_—_—_—_———OO OOO 
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Listing 8.46 ASCII octal to binary in HL. 


5000 


5800 
5806 
S80c 
S80F 
5812 


5000 
5002 
5005 
5007 
SOOA 
Soop 
5010 
5011 
5014 
S015 
5018 
SO1A 


501D 


5020 
5021 
5024 
5027 
502A 
902C 
SO02F 
5031 
5034 
5035 
5036 
5037 
5038 
SO3A 
503B 


SO3E 
5040 
5043 
5044 


C30050 


’ THIS 
¢ WITH 
, 

¢ JAN 2 
5 

ORG 

; 
MONIT 
OUTT 
INPLN 


GETCH 
OUTHX 


, 
START? 


THE N 


‘a> “er > <a> 


INPUT 


<> <> > 


RDOCT: 


OBIN2: 


CHECK 


> “a> ~e 


OBIN4: 
OBIN3: 


y 


FROGRAM IS DESIGNED TO OPERATE 
THE SYSTEM MONITOR AT S800 HEX 


2979 

S000H 

EQU S800H 

EQU MONITtS 

EQU MONIT+0OCH 

EQU MONIT+OFH 

EQU MONIT+12H 

MVI A» ODH sCARR RET 
CALL OQUTT 

MVI Ay OAH sLINE FEED 


CALL OUTT 
CALL INPLN sGET A LINE 


CALL RDOCT sOCT TO BIN 
MOV CrH sHIGH HALF 
CALL OUTHX > RIN-HEX 
MOV Col yLOW HALF 
CALL OQUTHX + BIN-HEX 
MVI Ay’ ¢ +SPACE 

CALL OUTT 


EXT INSTRUCTION IS NEEDED WHEN 


THE ROUTINE IN LISTING 8.13 IS USED 


CALL OUTOCT ¢#BIN-OCT 


JMP START sNEXT VALUE 
H»yL FROM CONSOLE 

PUSH 0 sSAVE REGS 
LXI HrO sCLEAR 
CALL GETCH *GET CHAR 
Jc OBINS sLINE END 
SUI ‘0’ #TO BINARY 
Jc OBIN4 >< 0 

CPI 8 

JNC ERROR > > 8 

DAL H sTIMES 2 
DAD H sTIMES 4 
DAL H sTIMES 8 
MOV EvA sNEW BYTE 
MVI Dv0 

DAD 0 sADD NEW BYTE 
JMP OBIN2 sNEXT 

FOR BLANK AT END 

CFI (% ¢=/07%) ANDI OFFH 
JNZ ERROR *NOT BLANK 
POF D #RESTORE 
RET 
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¢ FRINT ? ON IMPROPER INPUT 
’ 
9045 El ERROR: FOF H sRAISE STACK 
5046 El FOP H 
9047 3E3F MVI Ay’?! 
5049 Ch04658 CALL OUTT 
S04C C30050 JMF START sTRY AGAIN 


This routine will convert a string of ASCII-encoded octal characters 
into a 16-bit binary number in the HL register pair. The current value in the 
HL register pair is multiplied by 8 (the number base) by performing three 
DAD H instructions. The new byte is converted from ASCII to binary by 
subtracting an ASCII zero. It is checked at this time to ensure that it is in 
the proper octal range of 0 to 7. The addition of the new digit to the present 
value is more complicated than it was for the binary or hex routines. The 
problem is that there can be a carry out from the low-order byte. For this 
reason, the new byte is placed into the DE register pair, then combined with 
the value in HL by using the double-precision DAD D instruction. 


CONVERSION OF THREE ASCII OCTAL CHARACTERS 
TO AN 8-BIT BINARY NUMBER IN REGISTER C 


The routine given in Listing 8.7 will convert exactly three ASCII-encoded 
octal characters into an 8-bit octal number in register C. The routine is pro- 
grammed for fixed-format input; therefore, exactly three characters must be 
given. Assemble the program, load it into memory, and start it up. Type in 
the following octal numbers, including the leading zeros. 


Since the largest 8-bit number is 255 decimal or 377 octal, the first digit 
must be in the range 0-3. The remaining two digits must be in the range 0-7. 
A check is made to ensure that the characters are in the proper range. The 
first ASCII character in the input string is converted to binary by subtracting 
an ASCII zero. The result is multiplied by 8 with three ADD A instructions 
and the result is saved in the C register. The next character is converted to 
binary and added to the first with the ORA C instruction. The new sum is 
multiplied by 8 again with three ADD A instructions, then saved in the C 
register. Finally, the third character is converted to binary and added in. The 
final result is moved to the C register. 


NUMBER-BASE CONVERSION 


Listing 8.7. ASCII octal 8-bit binary in C. 
IF THREE DIGITS» LEFT ONE MUST RE <4 


5 

; 

§ THIS PROGRAM IS DESIGNED TO OFERATE 
¢ WITH THE SYSTEM MONITOR AT S800 HEX 
3 
, 
, 


JAN 225 80 

3000 ORG 3000H 

’ 
5800 = MONIT EQU 3800H 
5806 = OUTT EQu MONITtS 
S80C = INPLN EQU MONIT+OCH 
SB80F = GETCH EQU MONIT+OFH 
9812 = QUTHX EQU MONIT+12H 

, 
S000 3EOD START: MVI A» ODH sCARR RET 
5002 CL04658 CALL OUTT 
3005 3EOA MVI AyvOAH sLINE FEED 
5007 Ch0658 CALL OUTT 
SOOA CHOCS8 CALL INFLN sGET A LINE 
SOOoD CDh1BSO CALL ocTs sOCT/BIN 
5010 CD1258 CALL OUTHX sPRINT HEX 
9013 3E20 MVI Ay’ ¢ > BLANK 
59015 CD0658 CALL OUTT 


THE NEXT INSTRUCTION IS NEEDED WHEN 

THE ROUTINE IN LISTING 8.14 IS USED 
CALL OcT *BIN TO ASCII 

9018 C30050 JMF START sNEXT VALUE 


<> “er “a> “o> 


CONVERT ASCII-ENCODED OCTAL 
TO 8-BIT BINARY NUMBER IN C 


© «> «> «> «> 


S01B C3550 cT8: CALL OCTIN 91ST CHAR 
SO1E FEO4 CFI 4 sFIRST 
5020 D24750 JNC ERROR *TOO LARGE 
5023 87 ADD A sTIMES 2 
5024 87 AnD A yTIMES 4 
59025 87 ADD A sTIMES 8 
5026 4F MOV CrA sSAVE BYTE 
9027 CN3550 CALL OCTIN s2ND CHAR 
502A Bl ORA Cc > COMBINE 
502B 87 ADD A ¢TIMES 2 
502C 87 ADL a *TIMES 4 
5S02D 87 Ann A sTIMES 8 
SO2ZE 4F MOV CA 

S02F CD3550 CALL OCTIN *3RD CHAR 
S032 Bl ORA Cc > COMBINE 
5033 4F MOV CrA sSAVE IN C 
5034 C9 RET 


CONVERT INFUT CHARACTER 0-7 TO BINARY 


5035 CDOFS8 CTIN: CALL GETCH 
5038 DA4650 Jc ERR2 3NO CHAR 
SO3B [1630 suI “0° sASCII BIAS 


503D DA4650 Jc ERR2 §TOO SMALL 
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5040 FEO8 CFI 8 
5042 D24650 JNC ERR2 ¢TOO LARGE 
5045 C9? RET 


¢ PRINT ? ON IMPROPER INPUT 


a 


5046 C1 ERR23 POP B sRAISE STACK 
5047 Cl ERROR: POF B 

5048 3E3F MVI Ar‘?! 

504A CD0658 CALL OUTT 

504D C30050 JMP START 3TRY AGAIN 


CONVERSION OF TWO ASCII BCD DIGITS 
TO AN 8-BIT BINARY NUMBER IN REGISTER C 


The binary coded decimal (BCD) notation was introduced in Chapter 2. This 
method of encoding is less efficient than the binary notation. It takes more 
memory space to encode numbers, and mathematical operations can be 
considerably slower. The BCD notation, however, has two advantages. One 
is that. conversion from decimal to BCD is simpler than conversion from 
decimal to binary. The second advantage is freedom from round-off error. 

The conversion routine given in Listing 8.8 accepts exactly two ASCII- 
encoded decimal digits and converts them into an. 8-bit BCD number in the 
C register. The routine can be repeatedly called to convert numbers with 
more than two characters. 


Listing 8.8. ASCII hex to BCD in C. 


THIS PROGRAM IS DESIGNED TO OFERATE 
WITH THE SYSTEM MONITOR AT 3800 HEX 


<a> <a> <a> <a> “er 


JAN 13% 80 

5000 ORG 3000H 

y 
5800 = MONIT EQU 5800H 
5806 = OUTT EQU MONIT+4 
S80C = INFLN EQU MONIT+0CH 
S80F = GETCH EQU MONIT+OFH 
9812 = OUTHX EQU MONIT+12H 

, 
9000 3E0D START: MVI A,ODH sCARR RET 
5002 CDO4658 CALL OUTT 
9300S 3EOA MVI A» OAH sLINE FEED 
5007 Cl0Oé58 CALL OUTT 
900A CLOCSS CALL INPLN *GET A LINE 
Joon Ch2050 RDOHL23 CALL HEX2 sLEFT CHAR 
5010 87 AnD A *TIMES 2 
53011 87 ADD A *TIMES 4 
3012 87 ALL A +TIMES 8 
9013 87 Ann A *TIMES 16 


5014 4F MOV CrAé 9 SAVE 
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5015 Ch2050 CALL HEX2 sRIGHT CHAR 
5018 B1 ORA Cc > COMBINE 
5019 4F MOV CrA 
SOLA Ch1258 CALL OUTHX gPRINT 
901 C30050 JMF START yNEXT 
, 
9020 CDOFS8 HEX23 CALL GETCH sHEX CHAR 
, 
§ CONVERT ASCII CHARACTERS TO BINARY 
; 
5023 11630 NIB? SUI ‘0’ yASCIT BIAS 
5025 DA2B50 Jc ERROR > 2 0 
9028 FEOA CFI 10 
502A 18 RC yNUMBER 0-9 
, 
¢ FRINT ? ON IMPROPER INPUT 
, 
5S02B 3E3F ERROR: MVI Ay?’ 
5020 ChOé58 CALL OUTT 
9030 C30050 JMP START sTRY AGAIN 
; 
9033 END 


With the BCD notation, there is a 2:1 correspondence between the 
number of BCD digits and the necessary number of bytes. Or, put another 
way, two decimal digits are stored in each byte. This arrangement is some- 
times called packed decimal. The right decimal digit is encoded in the low- 
order four bits and the left digit is encoded into the high-order four bits. 


38 0011 1000 
27 0010 0111 
59 0101 1001 


BCD encoding involves essentially the same steps as does the hex-to-binary 
routine, except that only the characters 0 through 9 are allowed. The bit 
patterns corresponding to the hexadecimal numbers A through F are not 
allowed. 


CONVERSION OF AN 8-BIT BINARY NUMBER IN C 
TO A STRING OF EIGHT ASCII BINARY CHARACTERS 


In the first part of this chapter we developed programs to convert strings of 
ASCIl-encoded characters into binary numbers. The programs in the follow- 
ing sections will perform the reverse operation. Binary numbers will be 
converted into strings of ASCII-encoded characters. Furthermore, we will 
combine the new routines with those already developed so that they may be 
more easily tested. 

The program shown in Listing 8.9 can be used to convert an 8-bit 
binary number in register C into eight ASCII-encoded binary characters. The 
resulting characters are sent to the console in this case, but they could be 
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placed into sequential memory locations instead. This routine is incorpo- 
rated into the system monitor developed in Chapters 6 and 7. 


Listing 8.9 Binary in C to ASCII binary. 


THIS FROGRAM IS DESIGNED TO RUN WITH 
THE SYSTEM MONITOR AND WITH THE 
FROGRAM SHOWN IN LISTING 8.1 


, 
, 
, 
, 
» FRINT AN 8-BIT BINARY NUMBER IN C AS 
> 8 ASCII-ENCODED BITS 
, 
BR 
k 


SO4A 0608 ITS: MVI By8 *8 BITS 
504C 79 IT23 MOV ArC *GET BYTE 
S041 87 Abn é 9SET CARRY 
SO4E 4F MOV CrA sFUT BACK 
SO4F 3E18 MVI A»x’0’/2 HALF OF O 
5051 8F Anc A 9 DOUBLE+CARRY 
5052 Cu0658 CALL OUTT yONE BIT 
9055 0S DCR B + COUNT 
9056 C24CS50 JINZ BIT2 98 TIMES 
59059 C9 RET 

y 
SOSA END 


Make a duplicate copy of the source program shown in Listing 8.1. 
This routine was used to convert ASCII-encoded binary characters into an 
8-bit binary number in C. Remove the semicolon from the instruction that 
reads 


; CALL BITS +BIN TO ASCII 


Also delete the END directive if you used one. Add the lines given in Listing 
8.9 to the end of the program. 

The new routine works in the following way. Register B is initialized 
with the value of 8, the number of bits to be generated. Register C begins 
with the original binary byte. The bits of this byte are shifted to the left one 
at a time into the carry flag. The carry flag is then added to an ASCII zero 
to produce a 0 ora 1 at the console. For the 8080 version, the byte is moved 
to the accumulator, shifted left with an add instruction, then returned to 
register C. 

If the current high-order bit is a zero, then the carry flag is reset and a 
zero is printed. If the current high-order bit is a 1, then the carry flag is set 
and a 1 is printed. The count in the B register is decremented after each 
character is printed. When the count reaches zero, the process is terminated. 

Notice that the addition of the carry flag to the ASCII zero could have 
been accomplished with the instructions 


MVI Ar’0’ 
ACI t¢) 
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However, this will require four bytes. The code we will use, which is not so 
obvious, requires only three bytes. 


MVI Ar’0°/2 
ADC A 


If you have a Z-80 CPU, this routine can be simplified and shortened 
by three bytes. Performing the rotation directly in the C register reduces 
the program by one byte. Two additional bytes are gained by using the 
decrement B, jump-not-zero operation. Now the accumulator can be zeroed 
with an exclusive-or operation and the carry can be added directly to an 
ASCII zero. 


BITS: LD By8 $8 BITS 

BIT23 XOR A sZERO A 
SLA L gSHIFT Lo LEFT 
ADC Ax‘Q’ sADD CARRY TO O 
CALL OUTT 9SEND 
DJINZ BIT2 $8 TIMES 
RET 


Assemble the combined program, load it into memory, and start it up. 
Be sure that the monitor is in place at the address of MONIT. The new 
binary-to-ASCII binary routine has been added in addition to the original 
binary to ASCII hex in the system monitor (OUTHX). Consequently, each 
number will now be rendered in both hex and binary. Type in the following 
binary numbers. 


>0 (you tyre this) 

00 00000000 (both hex and binary are siven) 
>1 

01 00000001 

7101 

05S 00000101 

*10101010 

AA 10101010 

>11110000 

FO 11110000 


Remember that the error-correction features of the monitor are available. If 
you inadvertently type a control-X, you will end up in the monitor itself. 
You can return from the monitor to the new program, however, by typing 


>G65000 


if this is where you assembled the new routine. 
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CONVERSION OF AN 8-BIT BINARY NUMBER 
INTO THREE ASCII DECIMAL CHARACTERS 


An 8-bit binary number can be converted into a string of ASCII-encoded 
decimal characters by repeated subtraction of powers of 10, the number 
base. The corresponding decimal number will lie in the range of zero to 255. 
The value of 100 (decimal) is repeatedly subtracted from the original binary 
number until the result becomes negative. One less than the number of 
subtractions is the number of hundreds in the decimal form. The result, 
which in this case can only be 0, 1, or 2, is added to the value of an ASCII 
zero, then sent to the console. 
As an example of the 100s subtraction, consider the number 137. 


—100 (one subtraction) 


—100 (too many) 
(negative number) 


Since there was one subtraction of 100 before the number became negative, 
the number is in the range 100 to 199. 

The value of the last 100 is added back to make the number positive 
again. Then the value of 10 is repeatedly subtracted from the new value 
until a negative result is again obtained. The number of tens in the decimal 
form is one smaller than the number of subtractions. This count is added to 
an ASCII zero and sent to the console for the middle digit. The value of ten 
is added back to the remainder. This adjusted remainder is then added to an 
ASCII zero to produce the units digit. It too is sent to the console. 

Continuing with the example: 


(negative number) 
+100 (add back last 100) 


37 
—10 (first subtraction) 


—10 (2nd subtraction) 
-10 (8rd subtraction) 


-10 (too many) 


(negative number) 
+10 (add back last 10) 


7 (units) 


Since there were three subtractions of 10 before the remainder became 
negative, the middle digit is a 3. Finally, the right digit is 7, the remainder 
after the last subtraction of 10. 
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Lisiting 8.10 gives the instructions for the conversion of an 8-bit binary 
number in register H. Register D initially contains the value of 100 (decimal) 
that is to be repeatedly subtracted from the number in H. As soon as the 
result of the subtraction becomes negative, the last 100 is added back, and 
the value in D is changed to a 10 by subtraction of 90. Register C is used to 
count the number of subtractions. It is initialized with the value of one less 
than an ASCII zero to simplify the conversion. 


Listing 8.10. Binary in A to ASCII decimal. 

THIS FROGRAM IS DESIGNED TO RUN WITH 
THE SYSTEM MONITOR AND WITH THE 
FROGRAM SHOWN IN LISTING 8.4 

FEB 27,» 80 


PRINT BINARY NUMBER IN A AS ASCII 
DECIMAL DIGITS. LEADING ZEROS SUFFRESSED 


3 eo wer er er ~er “er er ar er “er 


5057 0S EC8: PUSH i) 

_ 5058 CS FUSH B 
S059 1E00 MVI E,r0 sLEADING O FLAG 
SOSE 1664 MVI Dy100 
SOSD OE2F DEC81: MVI Cr’O’-1 
SOSF OC DEC82: INR Cc 
5060 92 SUR t #100 OR 10 
S061 [25F50 JNC DEC82 *STILL + 
5064 82 ADD vt) yADD BACK 
5065 47 MOV BrA +REMAINDIER 
5066 79 MOV ArC 9GET 100/10 
5067 FE31 CFI ‘1’ s ZERO? 
5069? D27250 JNC DEC84 vYES 
SO6C 7B MOV ArvE sCHECK FLAG 
9060 B7 ORA A yRESET? 
506E 79 | MOV ArC sRESTORE BYTE 
SO06F CA7750 JZ DEC8S sLEADING ZERO 
5072 CD0658 DEC84: CALL OUuTT gPRINT IT 
9075 1EFF MVI EvOFFH #¢SET 0 FLAG 
5077 7A DEC8S: MOV Ast 
5078 DT6SA SUI 90 9100 TO 10 
SO7A S7 MOV [vA 
507K 78 MOV A»B sREMAINDER 
907C D25D50 JNC DEC81 +AGAIN 
SO7F C430 ADT ‘0’ sASCII BIAS 
5081 CLhOé658 CALL OUTT 
9084 Ci FOF B 
508s D1 FOF ft) 
5086 C9 RET 

, 

5087 END 


There is an additional feature added to this routine: leading-zero sup- 
pression. Leading zeros are typically suppressed when a number is expressed 
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in decimal form. On the other hand, leading zeros are commonly left in 
place for binary, octal, and hexadecimal numbers. Thus, we write 


for decimal numbers, but 


00001111 (binary) 
040 (octal) 
OFE3 (hexadecimal) 


for the others. 

One reason for keeping leading zeros is to make it easier to distinguish 
octal or hex numbers from decimal numbers. With this convention, the 
number 0137 would be interpreted as an octal or hex value rather than a 
decimal number. The suppression of leading zeros is not a difficult task, but 
it does require some additional code. It is not sufficient to merely remove 
all zeros, for then the number 0307 becomes 37. 

One technique is to utilize a zero-suppression flag which is initially 
reset. Zeros are omitted as long as the flag remains reset. Then the flag is set 
when the first nonzero character is encountered. Subsequent zeros are not 
removed since the flag is set. 

The necessary zero-suppression code has been included in the routine 
shown in Listing 8.10. Register E is used for the flag; it is initially reset. 
Then each character is checked with a CPI '1' instruction to see if it is an 
ASCII zero. If the value is not a zero, it is printed and the flag is set to FF 
hex. On the other hand, if the digit is a zero, the flag is checked. If it is 
found to be reset, the zero is not printed. Only three decimal characters can 
be produced from the original byte; consequently, just the first two need to 
be checked. If the value of the byte is zero, a single ASCII zero is printed. 

The B, C, D, and E registers are utilized in the operations. Conse- 
quently, the original values are initially saved on the stack, then restored at 
the conclusion of the routine. 

Duplicate the program shown in Listing 8.4, the ASCII-hex to binary 
routine. Keep one of the copies as a backup, then rename the other one 
HEXDEC.ASM. Remove the semicolon at the beginning of the line 


, CALL DEC8 


and remove the END directive at the end of the program. Add the lines given 
in Listing 8.10. Assemble the combination program, load it into memory, 
and start it up by branching to the address of START. We have coupled the 
16-bit hex input program with the 8-bit decimal output program. Conse- 
quently, only the high-order byte will be converted to decimal. This is the 


NUMBER-BASE CONVERSION 175 


byte in the H register. Try the combined program with the following hex 
numbers. 


>0 

0000 0 

>1 

0001 0 

>100 

0100 1 

>A00 

OA00 10 (hex A is decimal 10) 
>1000 

1000 16 (10 hex is 16 decimal) 
>FFFF 

FFFF 255 (FF hex is 255 decimal) 


This binary-to-decimal routine can be very useful at the CP/M systems 
level. Suppose that you want to save a program that starts at 100 hex and 
runs to 2736 hex. If the decimal routine is incorporated into a hexadecimal 
math routine of the system monitor, you have only to type 


>H2800 100 (command) 
2900 2700 39 (response) 


The response of 39 is the decimal number of 256-byte blocks to be saved. 
Then you can give the CP/M command 


A>SAVE 39 FILENAME.EXT 


CONVERSION OF A 16-BIT BINARY NUMBER 
INTO FIVE ASCII DECIMAL CHARACTERS 


In the previous section, we developed a routine to convert an 8-bit binary 
number into three ASCII-encoded decimal characters. We will now write a 
routine for converting a 16-bit binary number in HL into 5 ASCII-encoded 
decimal characters. This double-precision decimal number will range from 
zero to 65,535. 

Duplicate the decimal-to-16-bit binary program in Listing 8.2. Remove 
the semicolon from the line 


, CALL DBIN 


and the END directive if you used one. Add the program shown in Listing 
8.11 to the end. 
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Listing 8.11 


S0SS 
5057 
SOSA 
90sD 
5060 
5063 
5066 
5069 
506C 
SO6F 
5070 
5072 


S075 
5077 
5078 
3079 


507C 
9070 
SO7E 
SO7F 
5080 
5081 
9082 
5083 
5084 


5085 
5087 
SO8A 
508B 
508C 
508D 
SO8E 


so91 
5093 


5096 


cs 
C30658 


O6FF 
C30658 


Binary in HL to ASCII decimal. 


FER 229 79 


RU er wer ser er wer a> a> ~er er 


IND? MVI 
LXI 
CALL 
LXI 
CALL 
LXI 
CALL 
LXI 
CALL 
MOV 
ADT 
JMP 


SUBTRACT F 


“<> “er a> 


SUBTR: MVI 
SUBT2$ INR 
DAD 
Jc 


ONE TOO MA 


MOV 
CMA 


CHECK FOR 


‘o> a> “> 


ZEROS MMVI 
JMF 


END 


OWER 


NY» 


ZERO 


PRINT BINARY NUMBER IN 
DECIMAL DIGITS. LEADIN 


B:0 
Dy-10000 
SUBTR 
Dy-1000 
SUBTR 
[iy-100 
SUBTR 
Dy-10 
SUBTR 
Ark 

‘0’ 
OUTT 


OF TEN 


Cr’O’-1 
Cc 

it) 
SUBT2 


ADD ONE 


Avr 


DrA 
AvE 


ds es 
NZERO 
ArE 

A 

ArC 


OUTT 


SET FLAG FOR NON-ZERO 


By OFFH 
OUTT 


THIS FROGRAM IS DESIGNED TO RUN WITH 
THE SYSTEM MONITOR AND WITH THE 
FROGRAM SHOWN IN LISTING 8.2 


HyL AS ASCII 
G ZERO SUPPRESSED. 


*LEADING O FLAG 
92°S COMPL 

910 THOUS 

+ THOUS 
*HUNDREDS 

*TENS 


vASCII BIAS 
sUNITS 


AND COUNT 
sASCII COUNT 


sADD NEG NUMBER 
sKEEF GOING 


BACK 


9 COMPLEMENT 
> DvE 


ANDI 
ALL BACK 
#GET COUNT 


yLESS THAN 1? 
9NO 

*CHECK O FLAG 
+SET? 

*RESTORE 

ySKIF LEADING 0 
*INTERIOR ZERO 


CHARACTER 


¥SET O FLAG 
sPRINT IT 
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This 16-bit version is similar to the 8-bit version of the previous section. 
This time we start with the subtraction of the decimal value 10,000 instead 
of 100. The number of subtractions is counted as before. When the result 
becomes negative, the last 10,000 is added back. The number of subtractions 
that was performed is the desired digit for the ten-thousandths position. 

Since the 8080 CPU does not incorporate a 16-bit subtraction operation, 
the subtraction is obtained by adding the corresponding two’s complement 


LXI D»-10000 


DAD D 


The carry flag will be set for each addition (subtraction) except the last. The 
carry flag is then reset for the operation corresponding to the result becom- 
ing negative. The JC instruction in subroutine SUBTR causes the computer 
to loop the correct number of times. Suppose, for example, that the binary 
number in HL corresponds to the decimal number 32,128. This is the 
equivalent of the hexadecimal value 7D80. The two’s complement of 10,000 
is D8FO hex. The sum of these two is 


decimal hexadecimal 
329128 7080 
-10*000 +08FO 


227128 5670 


Thus the addition of 7D80 and D8FO hex is equivalent to subtracting 
10,000 from 32,128. 

The last subtraction that causes the result to become negative has to be 
undone. This could be accomplished by adding 10,000. However, the addi- 
tion is accomplished in subroutine SUBTR which is also used to add back 
the 1,000, 100, and 10 for the equivalent steps of each decade. Therefore, 
we won’t know, in general, which value to add. The solution is to obtain the 
necessary value from the two’s complement of the two’s complement for 
the current value. This two’s complement is first obtained by complementing 
both the D and the E register to produce the one’s complement. Then the 
DE register pair is incremented. Subroutine SUBTR is first called with DE 
set to -10,000, then to —1,000, —100, and -10. At this point, the units digit 
is contained in the L register. 

This double-precision routine also incorporates instructions for sup- 
pressing leading zeros. The approach is similar to the one used in the previous 
section except that the H register is used for the zero flag. 

Assemble the combination program, load it into memory, and start it 
up. Enter the following decimal numbers. The response will include both the 
hexadecimal and the decimal values of the input number. 
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0400 1024 
265535 
FFFF 65535 


At this point you may want to incorporate decimal numbers into the system 
monitor. When we incorporated an ASCII-input feature into the monitor we 
used the apostrophe to indicate this fact. It is customary to precede decimal 
numbers by a number sign. For example, the following input would indicate 
decimal input. 


>H#1024 #200 


CONVERSION OF AN 8-BIT BINARY NUMBER 
INTO TWO ASCII HEXADECIMAL CHARACTERS 


The conversion of an 8-bit binary byte into two ASCII-encoded hexadecimal 
characters is an interesting exercise. The high-order four bits are represented 
by one hex character, and the low-order four bits are represented by the 
other hex character. Since the upper character is printed first, the upper four 
bits are rotated down to the lower position. These new lower four bits are 
converted to ASCII to produce the first character. Then the original low- 
order four bits are converted to ASCII to get the second character. 

The nibble conversion appears to be straightforward. The upper four 
bits are zeroed by performing a masking AND with the value of OF hex. The 
lower four bits are then converted to ASCII by the addition of an ASCII 0. 
If the result is in the range 0-9, then the conversion is complete. Otherwise, 
a binary 7 is added to the result, converting it to an ASCII-encoded letter of 
A through F. 

To see why this conversion works, look at the ASCII table in Appendix 
A. The ASCII number 9 has a decimal value of 57. The ASCII letter A has a 
decimal value of 65. But the hexadecimal value of A follows the value of 9. 
Therefore, we need to add 7 to any valid hex number larger than 9 to con- 
vert it into the appropriate ASCII letter A through F. 

The program shown in Listing 8.12 will convert an 8-bit binary number 
in the C register into two ASCII characters and send them to the console. 
Duplicate the program in Listing 8.5. Remove the external reference to 
subroutine OUTHX near the beginning. 


OQUTHX EQU MONIT+12H 


Our new program will perform the same function. Also remove the final 
END directive if you used one. Copy the lines from Listing 8.12 on the end 
of the program. Assemble the combined program, load it into memory, and 
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start it up. Our monitor will still have to be in memory since we will need 
the I/O routines. This current version, Listing 8.12, with the built-in binary- 
to-hex routine, should respond exactly the same as the earlier version, 
Listing 8.5. The only difference is that we are converting binary to hex 
within the program rather than using a routine in the monitor. 


Listing 8.12 Binary in C to ASCII hex 

THIS PROGRAM IS DESIGNED TO RUN WITH 
THE SYSTEM MONITOR AND WITH THE 
FROGRAM SHOWN IN LISTING 8.5 

JAN 18» 80 


ROUTINE TO OUTFUT 2 HEX CHARACTERS FROM C 
8-BIT BINARY TO ASCII HEX CONVERSION 


er wer a> er er er er er ee 


5043 79 UTHX: MOV ArC *GET BYTE 
5044 1F RAR #ROTATE 
5045 1F RAR 9 FOUR 
5046 1F RAR > BITS TO 
5047 1F RAR ¢ THE RIGHT 
5048 CD4CSO CALL HEX1 sUPFER CHAR 
S0O4B 79 MOV ArC sLOWER CHAR 
y 
SO4C ES60F HEX1; ANI OFH sLOW 4 BITS 
SO04E C4630 ADI “0° yASCII ZERO 
5050 FESA CFI “9% +1 70 TO 9 
5052 DA06S8 Jc OUTT ¥YES 
5055 C607 ADT 7 »>CONVERT 
5057 C30658 JMP OUTT 9A TO F 
y 
SOSA END 


The algorithm used to convert the binary nibble to a hex character 
clearly demonstrates the technique. But there is a more efficient method for 
CPUs such as the 8080 and Z-80 that incorporate the decimal adjust accum- 
ulator (DAA) instruction. Change the second, third, fourth, and fifth lines 
of subroutine HEX1 so the subroutine looks like 


HEX13: ANI OFH (same) 
ADI 9OH (new) 
DAA (new) 
ACI 40H (new) 
DAA (new) 
JMP OUTT (same) 


Conversion of a 16-bit binary value into four hex characters is obtained 
by calling the 8-bit routine twice. For example, the HL register pair can be 
printed with the following routine. 


OUTHL?: MOV CoH 
CALL OUTHX 
MOV Col 


CALL OUTHX 
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Conversion of a binary number to a string of ASCII-encoded BCD 
characters does not require a special routine. It is performed simply by 
calling the binary-to-hex routine OUTHX. 


CONVERSION OF A 16-BIT BINARY NUMBER 
INTO SIX ASCII OCTAL CHARACTERS 


A 16-bit binary number in the HL register pair can be converted into six 
ASCII-encoded octal characters by repeatedly shifting the double register to 
the left. We make use of the double-register add instruction DAD H. This 
instruction adds the register pair HL to itself. The operation is equivalent to 
a double-precision arithmetic shift left. All 16 bits are shifted left and a zero 
is moved into the lowest order bit. The carry flag is set if the original highest- 
order bit was a logical one. The carry bit is reset otherwise. 

The routine is shown in Listing 8.13. As the bits of the double register 
are shifted out the high end, they are converted to the corresponding octal 
number in the accumulator. The largest 16-bit octal number is 177777; 
consequently, the first octal character (starting from the left) can only bea 
zero or a one. The remaining five characters can range from zero through 7. 
They are obtained from groups of three bits. 


Listing 8.13 Binary in HL to ASCII octal. 

THIS PROGRAM IS DESIGNED TO RUN WITH 
THE SYSTEM MONITOR AND WITH THE 
FROGRAM SHOWN IN LISTING 8.46 

JAN 18% 80 


ROUTINE TO OUTPUT A 16-BIT BINARY 
VALUE IN HryL AS OCTAL CHARACTERS 


, 
, 
, 
, 
, 
, 
, 
, 
; 
0 


5052 ES UTOCT: FUSH H ySAVE VALUE 
5053 CS FUSH B 

5054 0605 MVI ByS 95 CHAR 
9056 AF XRA A ¥ZERO 

5057 29 DAD H sHIGH BIT 
5058 CE30 ACI “0° sADDELD IN 
SOSA C0658 CALL OUTT sFRINT IT 
SOSD 3E06 OCT2; MVI Ard *ROTATE 60Q 
SOSF 29 DAD H + CARRY 

5060 17 RAL sROTATE TO A 
S061 29 DAD H +AGAIN 

5062 17 RAL *TO A 

9063 29 An H y3RD TIME 
9064 17 RAL *7TO A 

9065 CD0658 CALL OuTT sPRINT CHAR 
5068 05 DCR B > COUNT 

5069 C25D50 JNZ OCT2 93 TIMES 
506C C1 FOF B 

5S06D El POP H 

SO6E C9 RET 


> 


SO6F END 
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The first step shown in Listing 8.13 saves the HL and BC registers on 
the stack. This operation may not always be necessary. The XRA operation 
is used to zero the accumulator. It must be performed before the DAD H 
instruction since it resets the carry flag. The DAD instruction will set the 
carry flag if the high-order bit was a 1, or reset the flag if the high-order bit 
was a zero. The carry flag is then added to an ASCII zero and sent to the 
console. 

The remaining five digits are generated in a loop starting at label OCT2. 
Register B is preloaded with the value of 5 to count the remaining digits. 
We need to transfer the current three high-order bits from the H register into 
the accumulator. This is accomplished by three DAD H instructions. After 
each one, the carry flag will reflect the state of the most recent high-order 
bit of H. After each DAD instruction, we perform a rotate accumulator 
instruction. This moves the carry bit into the low-order bit of A. After three 
such operations, the three low-order bits of the accumulator will contain 
the proper octal bit pattern for the appropriate character. But they are in 
binary form and we need to convert them to ASCII for printing. 

The bit pattern for the ASCII zero is 011 0000. Notice that it contains 
zeros in the lower four bit positions. At the beginning of the OCT2 loop we 
preloaded the accumulator with a binary 6 which has a bit pattern of 
000 0110. At the conclusion of the OCT2 loop, the three rotations will 
convert this binary 6 into a 60 octal which is equivalent to an ASCII zero. 
This effectively converts the three lower-order bits, shifted in from the carry 
flag, into ASCII-encoded octal. 

The Z-80 version can be a little shorter if the instruction 


DJNZ OcT2 
is used in place of 


DCR B 
JNZ OcT2 


CONVERSION OF AN 8-BIT BINARY NUMBER 
INTO THREE ASCII OCTAL CHARACTERS 


In the previous section we derived a subroutine for the conversion of a 16-bit 
binary number into ASCII characters. The conversion of an 8-bit binary 
number to octal will be considered here. We could use the H,L double 
register, as previously, to perform the necessary shifts. However, if the H,L 
register is needed for something else, such as a pointer to memory, then 
another method would be better. 

The routine shown in Listing 8.14 performs the needed rotations in the 
accumulator. The original binary byte is in the C register. The byte is moved 
to the accumulator and two left circular rotate instructions are performed. 
This effectively moves the two high-order bits down to the two low-order 
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positions. It is equivalent to performing six right circular rotations. The 
remaining bits are zeroed with a logical AND 3 step. The ubiquitous ASCII 
zero is added, and the result is sent to the console. 

The middle character is obtained by rotating the original byte to the 
right. A logical AND 7 isolates these low-order bits. The ASCII zero is added 
and the byte is sent to the console. The original byte is retrieved a third 
time. Now the three bits of the third character are properly positioned. 
Hence no rotation is needed. The masking AND operation is still needed, 
however. Finally, the ASCII zero is added prior to printing. 

Type the program shown in Listing 8.14. Add the new program to the 
end of the octal-to-binary program shown in Listing 8.7. Assemble the com- 
bination, load it into memory, and branch to the beginning. Remember that 
the input requires exactly three octal characters. If less than three are used, 
an error message of a question mark will be printed. If more than three 
characters are typed, only the first three will be used. 


Listing 8.14. 8-bit binary in C to ASCII 

THIS FROGRAM IS DESIGNED TO RUN WITH 
THE SYSTEM MONITOR ANI! WITH THE 
FROGRAM SHOWN IN LISTING 8.7 

JAN 22% 80 


ROUTINE TO OUTPUT AN 8-BIT BINARY 
VALUE AS THREE OCTAL CHARACTERS 


CH «> <a> ~e> <a> er <a> a> er er 


5053 79 CT: MOV Arc sGET IT 
5054 07 RLC 92 HIGH BITS 
5055S 07 RLC 
5056 E603 ANI 3 »MASK 
9058 C6550 CALL OCT3 
SOSE 79 MOV ArC 9GET AGAIN 
SOSC OF RRC yMIDDLE BITS 
SoSn OF RRC 
SOSE OF RRC 
SOSF CD46350 CALL OcT2 
59062 79 MOV ArC yRIGHT BITS 
5063 E607 OCT2: ANI 7 93 BITS 
9065 C4630 OCT3: ADI “08 yASCII BIAS 
5067 C30658 JMP OUTT sFPRINT 

’ 
306A END 


CONVERSION OF A 16-BIT BINARY NUMBER TO SPLIT OCTAL 


Some of the 8080 and Z-80 instructions can have either 8-bit or 16-bit 
operands. Typical 8-bit operations for the 8080 are 


MVI A,v10 
ADI 3 
ANI 7 
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The 16-bit operations include 


CALL 100H 
JMP S00SH 
LXI H»0 


But the 8-bit architecture of microcomputers means that 16-bit operands are 
stored as two consecutive bytes. Each byte can be represented as two hexa- 
decimal characters. And the entire 16-bit value can be represented by a 
combination of all four of these hex characters. For example, the 16 bits 


11110000 10101010 
can be represented with the hex characters 
FOAA 


Alternately, the left byte can be represented by an FO hex, and the right 
byte can be expressed as AA hex. There is no problem here since each hex 
character represents four bits, and both 8 and 16 are evenly divisible by 4. 

Octal representation is more complex. In this case, each octal character 
represents three bits (or sometimes two). Since neither 8 nor 16 is evenly 
divisible by 3, a problem can occur. Consider the 16-bit value 


1 111 010 011 101 010 
It can be represented in the octal notation as 

172352 
This is the result that the program in Listing 8.13 would produce at the 
system console. The problem is that the 16 bits are actually stored in two 
adjacent 8-bit locations. If the bit pattern is grouped into 8-bit bytes, it 
looks like this. 

11 110 100 11 101 010 
In this arrangement, the two corresponding octal bytes are represented as 


864 352 


The result, which has been termed split octal or crazy octal, looks very 
different from the corresponding 16-bit octal value of 172352. The two 
octal bytes of split-octal notation are sometimes separated by a colon to 
distinguish the representation from the regular 16-bit octal. 


364:352 
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The split-octal notation can be readily implemented, as shown in 
Listing 8.15. This program is adapted from the 8-bit octal-to-binary and 
binary-to-octal routines given in Listings 8.7 and 8.14. The first part takes 
two separate octal bytes and converts them to an 8-bit binary number. The 
second part converts the binary byte into two octal bytes. Each split-octal 
number is entered from the console as two groups of three characters. A 
space or colon can be used to separate the two parts. 


Listing 8.15. 


9000 


5800 
5806 
S80C 
S80F 
5812 


5000 
5002 
5005 
5007 
SOOA 
soon 
5010 
5011 
5014 
5015 
9018 
SO1A 
501D 


5020 


5023 
5026 
5027 
502A 
5020 
9030 
5031 


CN3250 
ol 
CDOFS8 
DASFSO 
CN3250 
59? 
c9 


, 
A 
9 
5 
a 
, 
. 
5 
* 
, 
5 
A 
, 
* 
5 
* 
, 
0 
* 


Srlit-octal routines 


6 OCTAL CHARACTERS SEPARATED BY A 
SPACE ARE ENTERED FROM THE CONSOLE. 
A 16-BIT BINARY NUMBER IS PRODUCED 
IN DvE. THIS IS RECONVERTED TO OCTAL 


THIS PROGRAM IS DESIGNED TO OFERATE 
WITH THE SYSTEM MONITOR AT S800 HEX 


JAN 22% 80 


RG 3000H 

’ 

MONIT EQu S800H 

OUTT EQU MONIT+H46 

INPLN Eau MONIT+0CH 

GETCH EQu MONIT+OFH 

OUTHX EQU MONIT+12H 

, 

START: MVI A, ODH yCARR RET 
CALL OUTT 
MVI Av OAH sLINE FEED 
CALL OUTT 
CALL INFLN sGET A LINE 
CALL ocTss 76 OCT CHAR 
MOV Crd yFIRST 
CALL OUTHX >TO HEX 
MOV CrE *SECOND 
CALL OQUTHX >TO HEX 
MVI Ar’ ¢ + BLANK 


<a> “a> er se> 


CALL OUTT 
CALL OUT8O ¢TO BINARY 
JMP START ¢NEXT VALUE 


6 SFLIT-OCTAL CHAR TO 16-BIT BINARY 


cTss:; CALL OocTs sFIRST 
MOV DC 9 SAVE 
CALL GETCH +SPACE 
Jc ERRS sONLY 1 CHAR 
CALL OcTs *SECOND 
MOV ErC »SAVE 
RET 


CONVERT ASCII-ENCODED OCTAL 
TO 8-BIT BINARY NUMBER IN C 


5032 
5035 
5037 
SO3A 
SO3B 
303C 
503D 
SO3SE 
9041 
5042 
5043 
5044 
9045 
5046 
5049 
SO04A 
5S04B 


S04C 
SO4F 
5052 
9054 
9057 
S059 
S0SC 


So0spD 
SOSE 
SOSF 
5060 
5062 
5065 


5068 
5069 
S06C 
S06E 
So71 


5072 
5073 
5074 
S075 
5077 
SO7A 
5078 
507C 
So7D 
SO7E 


cp4cso 


CDAC5O 
Bi 
A4F 
cy 


CDOFS8 
DASDSO 
D630 
DASDSO 
FEO8 
D25050 
c9 


Choé58 
C30050 


4A 
CD7250 
SESA 
CD0é658 
4B 


79 

07 

07 
E603 
cng4so0 


Cng250 


ocTs: 


oww = 
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CALL OCTIN 
CPI 4 

JNC ERROR 
AnD A 

Ann A 

ADD A 

MOV CrA 
CALL OCTIN 
ORA Cc 

Ang A 

Abn Aa 

ADD A 

MoV CrA 
CALL OCTIN 
ORA c 

MOV CrA 
RET 


CONVERT INPUT 


CTINS CALL GETCH 
Jc ERR2 
SUI ‘QO’ 
Jc ERR2 
CPI 8 
JNC ERR2 
RET 

y 

¢ PRINT ? ON IMPROPER 

y 

ERR2; FOP B 

ERROR: POF B 

ERR33 POP B 
MVI Ar?’ 
CALL OUTT 
JMP START 

g 

§ 16-BIT BINARY IN DeE 

g 

OUT8O0; MOV Crd 
CALL OCT 
MVI Ar’3’ 
CALL OUTT 
MOV CoE 


Ow w we 


ROUTINE TO OUTPUT AN 


VALUE AS THREE OCTAL 
CT: MOV ArC 
RLC 
RLC 
ANI 3 
CALL OCTS3 
MOV ArC 
RRC 
RRC 
RRC 
CALL ocT2 


185 


#1ST CHAR 
sFIRST 
¥TOO LARGE 
*TIMES 2 
sTIMES 4 
#TIMES 8 
sSAVE BYTE 
s2NTD CHAR 
»>COMBINE 
sTIMES 2 
sTIMES 4 
sTIMES 8 


93RD CHAR 
> COMBINE 
sSAVE IN C 


CHARACTER 0-7 TO BINARY 


¥NO CHAR 
sASCII BIAS 
9TOO SMALL 


§TOO LARGE 


INPUT 


*RAISE STACK 


#TRY AGAIN 
TO SPLIT OCTAL 


gFIRST BYTE 
9710 OCT 


sSEPARATOR 
sSECOND 


8-BIT BINARY 
CHARACTERS 


*GET IT 
¢2 HIGH BITS 


sMASK 


*GET AGAIN 
sMIDDOLE BITS 
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5081 
5082 
5084 
5086 


5089 


79? 
E607 
C430 
C30658 


OcT2;: 
OCT3: 


. 
’ 


END 


sRIGHT BITS 
93 BITS 
sASCII BIAS 
yPRINT 


The input number is converted into a 16-bit binary number in the D,E 
register pair by calling the 8-bit routine twice. The hex value is printed out 
as usual, then the split-octal version. A colon in the middle separates the 


two halves. 
Assemble the program and try it out. 


2177 


200 


377 (a space separator) 
7FFF 1773377 

>1003 
4080 1003200 


(a colon serarator) 


This completes the base-conversion routines. At this point, you may want to 
incorporate some of these routines into your system monitor. 


CHAPTER NINE 
Paper Tape and 
Magnetic Tape Routines 


It is possible to encode complete programs, such as a BASIC interpreter, into 
ROM so that calculations, such as the square root of 19, can be performed as 
soon as the computer is turned on. But more complicated problems will 
require a source program. If the source program is used frequently, then it 
would be inconvenient to reenter the source program each time it is needed. 
One way to avoid this reentry problem is to save the source program some- 
how and then reload it into the computer when it is needed. 

But BASIC is not the only computer language. Some tasks are more 
easily performed with other languages, such as Pascal or APL. Assembly 
language is useful for systems programming. A full text editor program has 
more features than the most complex BASIC interpreter. Thus, it is better 
not to have the BASIC interpreter in ROM. Instead, a small monitor pro- 
gram, such as the one developed in Chapter 6, can be placed in ROM. We 
can use this small monitor to load larger programs from an external medium. 

The floppy disk is a convenient medium for saving and reloading 
programs. The cost, however, is greater than other storage media such as 
paper tape or magnetic tape. Even if a floppy-disk system is utilized for 
program storage, it might be wise to make backup copies on magnetic or 
paper tape. 

The simplest storage method is to utilize the paper tape accessory 
available on some Teletype machines. With this approach, a separate com- 
puter I/O port is unnecessary. Furthermore, paper tapes can be read directly 
on the Teletype, without using a computer. The disadvantage of this method 
is that the transfer rate is low, since the Teletype operates at only ten char- 
acters per second. 

A more complicated, but faster, method utilizes an ordinary magnetic 
tape machine designed for home recording. In this case a separate I/O port 
will usually be necessary, but the advantage is that the recording rate is 
higher than for paper tape. Common data transfer rates range from 30 to 
over 120 characters per second. 
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The frequency response of audio tape recorders is limited to a maxi- 
mum of 10 to 20 kHz. But since the computer operates at 2 or 4 MHz, the 
signals from the computer cannot be directly copied onto tape. 

One solution is to convert the computer’s digital signals into sine waves 
that can be easily recorded. A digital-to-analog (D/A) circuit is used for this 
purpose. When the recorded program is subsequently played back into the 
computer, a separate analog-to-digital (A/D) circuit reverses the process. It 
converts the signal from a sine wave back into the digital form. The D/A and 
A/D circuits are combined on a printed circuit board with the usual parallel- 
to-serial converter for the I/O port. 


THE CHECKSUM METHOD 


Two separate tape-handling routines are given in this chapter; both may be 
used with paper tape or magnetic tape. They are both suitable for storing 
binary object programs, ASCII-encoded source programs, or just a set of 
numbers. The information is stored in a file consisting of a sequence of 
records. Each record contains a checksum that is used to detect errors. 

Errors can be introduced at several places in the tape-recording and 
playback process. The proximity of AC power cords to audio signal lines can 
change the transmitted signal. Oxide layers may fall off the tape, or there 
may be a defective spot on the recording surface. If the recording and play- 
back heads are dirty, they can incorrectly render the signal. The A/D conver- 
sion step, when the tape is played back, can also give rise to errors. 

In addition to the data, each record stored on the tape contains the 
record length, the memory address of the record, and a checksum byte. The 
checksum byte is obtained by adding all of the data bytes in the record. 
When the tape is read back, the computer sums up the data and compares 
the result to the checksum value written on the tape at the end of the rec- 
ord. A discrepancy indicates an error. 

Since an 8-bit checksum is used in both programs, there are 256 possi- 
ble combinations. Any single load error in the record will be discovered by 
this method. In principle, it is possible that two errors in the same record 
will combine to produce the expected checksum value. In practice, however, 
this is not likely to be a problem. Double errors occur much less frequently 
than single errrors. Furthermore, in a well-tuned system, single errors should 
be infrequent. They are most likely to be caused by low-quality tape, a dirty 
head, or a mistuned A/D converter circuit. Buy the best tape you can and 
clean the heads often. A routine that can be used for aligning the A/D circuit 
is incorporated in the second tape routine given later in this chapter. 


AN ASCII-HEX TAPE PROGRAM 


The tape program given in Listing 9.1 is based on an ASCII-encoded hexa- 
decimal format. It can be used to produce paper tapes or magnetic tapes of 
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computer programs. It can even produce a tape of itself. The program is 
self-contained and assembled to run at 100 hex. No outside routines are 
required. An additional feature of this program is that it can punch readable 
labels on the leader of a paper tape. (Of course, this feature is not very 
useful for magnetic tape recordings.) The label routine is discussed in the 
next section of this chapter. 


Listing 9.1.Hexadecimal tare routines. 


0100 


0010 


0010 
0011 
0001 
0002 
0006 
0007 
0001 
0080 


0o0oD 
O00A 
OO7F 
0008 
0000 


0100 


0103 
0105 
0107 
O10A 
010C 
O10E 


Hunn bn wou 


C37p01 


DB10 
E601 
CA0301 
DB11 
E6&7F 
c9 


‘> “a> <a> <a> 


HEXMON: A MONITOR TO DUMP» LOAD» AND 


VERIFY INTEL HEX 


CHECKSUM TAPES 


WITH TAPE LABEL FOR HEADER 


TITLE ‘hexmon 


, 

ORG 100H 

, 

, 

FIFI PPI FT PPP I TTP PTET ES 

’ 

RLEN EQU 16 

’ 

CSTAT EQU 10H 

CDATA EQU CSTAT+1 

CIMSK EQu 1 

COMSK EQU 2 

PSTAT EQU 6 

FDATA EQU PSTAT+1 

PIMSK EQU 1 

FPOMSK EQU 80H 

y 

CR EQU 13 

LF EQu 10 

DEL Eau 127 

CTRH EQU 8 

NNULS EQu 0 

te 

, 

START: JMP CONTIN 

, 

¢ INPUT A BYTE FROM THE 

, 

INPUTT: IN CSTAT 
ANT CIMSK 
JZ INFUTT 
IN CDATA 
ANI 7FH 
RET 


<> «> 


OUTFUT A CHARACTER TO 


with tlabel’ 


*RECORD LENGTH 


sCONSOLE STATUS 
sCONSOLE DATA 
9IN MASK 

sOUT MASK 
sPUNCH STATUS 
sFUNCH DATA 
»PUNCH IN MASK 
yPUNCH OUT MASK 


*CARRAGE RETURN 
sLINE FEED 


H CONSOLE BACKUP 


“<> “o> “o> 
“~~ 3 


CONSOLE 


+STRIF PARITY 


CONSOLE 
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O10F 
0110 
0112 
0114 
0117 
0118 
011A 


0118 
011C 
O11F 


0120 
0121 
0122 
0123 
0124 
0125 
0128 


0129 
012B 
0120 
O12E 
0130 
0131 


0134 
0136 
0137 
0139 
013A 
013B 
013D 
O13E 
O13SF 
0141 
0143 


0144 
0145 
0146 
0149 


CDd2901 
79 


E60F 
C690 
27 
CE40 
27 


C30FO1 


OUTT: 
OUTW: 


, 
, 
; 
0 


UTHL 3 


© «> «> «> «> 


UTHX? 


x > o> a> o> 


EX1; 


ZS er a> er we 


IB; 


INPUT 


2 > > > 


EADHL 


RDHL2 3 


OUTPUT HyL TO 
16-BIT BINARY 


MOV 
CALL 
MoV 


ANI 
ADI 
DAA 
ACI 
DAA 
JMP 


Heyl FROM CONSOLE 


PUSH 
FUSH 
LXI 

CALL 


FSW 
CSTAT 
COMSK 
OUTW 
PSW 
CLIATA 


CONSOLE 
TO HEX 


CyvH 


OUTHX 
Ceol 


A»C 


HEX1 
A»C 


OUTPUT A HEX CHARACTER 
FROM LOWER FOUR BITS 


OFH 
144 


64 


OUTT 


*FETCH H 
yPRINT IT 
sFETCH Ly PRINT IT 


CONVERT A BINARY NUMBER TO TWO 


HEX CHARACTERS» AND PRINT THEM 


sROTATE 

¢ UPPER 

¢ CHARACTER 

+ TO LOWER 
sOUTPUT UPPER 
sOUTPUT LOWER 


sTAKE 4 BITS 
*DAA TRICK 


sONCE AGAIN 


CONVERT ASCII CHARACTER FROM CONSOLE 
TO 4 BINARY BITS 


“O° sASCII BIAS 
5 8 40" 
(F/= "0/41 
9 INVERT 
sERRORy > ’F% 
10 
¢ INVERT 
sNUMBER IS 0-9 
Al -/9'-1 
10 


b 


EB 
HO 
GETCH 


yCHARACTER IS A-F 


*START WITH O 


014C 
O14F 
0152 
0155 
0156 
0157 
0158 
0159 
015A 
0O15B 


O1S5E 
01460 
0163 
0165 
0168 
01469 
016A 


O16B 
0160 
0170 


0173 
0174 
0175 
0176 
0179 
017A 


0170 
0180 
0183 


0186 
0189 
018C 
O18F 
0191 
0194 
0196 
0199 
0198 
O19E 
O1A0 
O1A3 
O1AS 


DA6801 


C34901 


FEFC 
CA6801 
FEFO 
C2é6B01 
C1 

D1 

c9 


SESF 
CDOFOL 
C30001 


C37301 


312106 
118603 
CD7301 


312106 
CDACO1 
CD0402 
FES? 
CA1A02 
FES2 
CAE602 
FE4S 
CAES02 
FESS 
CAE602 
FE47 
C26B01 
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DD > er > ~e 


DHL43 


RDHLS3 


y 
ERROR? 


Cf} em <a> cr er 


ENDM: 


ry 


, 
CONTIN: 


a 


RSTRT3 


CHECK FOR 
AT END OF 


MVI 
CALL 
JMP 


RDHLS yEND OF LINE 


NIB sCONVERT TO BINARY 
RDHL4 sNOT HEX 

H 916-BIT 

H ¢ SHIFT LEFT 

H 

H 

L sCOMBINE NEW 

LrA 


RDHL2 ¢NEXT 


COMMA OR BLANK 
ADDRESS 


“9’-"O" sCOMMA? 
RDHLS sYES» OK 
6 ¢="O"% #BLANK? 
ERROR +NO 

B 

D 


Ar’ ?? SIMPROPER INPUT 
OUTT 
START sTELL HOW AGAIN 


SEND CHRACTERS FOINTED TO BY DvE 
UNTIL A BINARY ZERO IS FOUND 


D sNEXT BYTE 

A sSEE IF ZERO 
+ DONE 

OUTT 

D 

SENDIM 

SP ySTACK 


DySIGN *#MESSAGE 
SENDM sSEND IT 


SP rSTACK 
INPLN sGET A LINE 
GETCH sINFUT THE TASK 


“wie + DUMP 

PDUMF 

“RS sREAD» NO AUTOSTART 
FLOAD 

ag sLOAD AND EXECUTE 
PLOAL 

“Ve sVERIFY 

FLOAD 

‘GC’ §GO SOMEWHERE 
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01A8 
O1AB 


O1AC 
O1AF 
O1B1 
01B4 
OiB7 
O1BA 
O1BC 
O1BF 
01C1 
01C4 
0106 
01C9 
01CB 
O1CE 
01D0 
o1n1 
01D3 
01D4 
01D7 
0108 
01D9 
O1DA 
o1DD 


O1EO 
O1E2 
O1ES 
O1E7 


O1EA 
O1EB 


O1EE 
O1FO 
O1F3 


cp440l1 
E9? 


CDEEO1 
SESE 
CDOFO1 
212406 
222106 
OE0O 
CDO0301 
FE20 
DAEOO1 
FE7F 
CAFS8O1 
FESB 


CABCO1L 
7E 
23 
oc 
CDOFO1 
C3BCO1 


FEOS 
CAFS8O1 
FEOD 
C2BCO1 


79? 
322306 


3EOD 
CDOFO1 
SEOA 


JUMP TO ANOTHER PROGRAM 


= 


CALL READHL *JUMP ADDRESS 
PCHL: PCHL *OKy GOODBYE 


INPUT A LINE FROM THE CONSOLE 
AND FUT IT INTO A BUFFER 


1 <> > er > (_ 


NPLN? CALL CRLF 


MVI Ar‘’>’ sCOMMAND PROMPT 

CALL OUTT sSEND TO CONSOLE 
INPL2: LXI Hy IBUFF sBUFFER ADDRESS 

SHLD IBUFP ¢INITIALIZE POINTER 

MVI C0 sINITIALIZE COUNT 
INPLI: CALL INPUTT *#CHAR FROM CONSOLE 

CPI ks yCONTROL CHAR? 

Jc INPLC sYESr GO PROCESS 

CPI DEL sDELETE CHAR? 

JZ INPLB 9YES 

CPI ‘Z’ +1 sUPPER CASE? 

Jc INPL3 *NO 

ANI SFH sMAKE UPPER 
INPL3: MOV MrA sFUT IN BUFFER 

MVI Ax32 sGET BUFFER SIZE 

CMP Cc sTEST IF FULL 

JZ INPLI sYES» LOOF 

MoV ArM sRECALL CHARACTER 

INX H sINCR POINTER 

INR c sAND INCR COUNT 
INPLE: CALL OUTT sECHO CHARACTER 

JMP INPLI +GET NEXT CHAR 


PROCESS CONROL CHARACTER 


5 
, 
, 
I 


NPLC? CPI CTRH 9H? 
JZ INPLB sYES 
CPI CR sTEST IF RETURN 
JNZ INPLI ¢NOv IGNORE CHAR 


END OF INPUT LINE 


<> “er > 


MOV ArC sLINE COUNT 
STA IBUFC 9 SAVE 
, 
§ CARRIAGE RETURN» LINE FEED 
CRLF MVI AryCR 
CALL OUTT 
MVI AryLF 


IF NULLS REQUIRED AFTER CRe LF 
USE REPEAT MACRG 


<> «> «> «> 
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IF NNULS > O sASSEMBLE 
CALL OUTT 
XRA a ¢GET A NULL 


REPT NNULS~-1 
CALL OUTT 


ENDIF sNULLS 


O1FS C3OFO1 JMP OUTT 


> 


DELETE ANY FRIOR CHARACTER 


O1F8 79 INPLB3 MOV ArC sCHAR COUNT 
O1F9? B7 ORA A sZERO? 

O1FA CABCO1 JZ INPLI ¥YES 

O1FD 2B DCX H sBACK POINTER 
O1FE OD DCR c s5AND COUNT 
O1FF 3E08 MVI ArCTRH #BACK CURSOR 
0201 C3DA01 JMP INPLE sPRINT IT 


OBTAIN A CHARACTER FROM THE CONSOLE 
BUFFER. SET CARRY IF EMPTY. 


“o> er er ~e> 


0204 ES GETCH$ PUSH H sSAVE REGS 

0205 2A2106 LHLD IBUFP 9GET FOINTER 
0208 3A2306 GETC2: LDA IBUFC sGET COUNT 

O20B D601 SUI 1 sDECR WITH CARRY 
0200 DA1802 Jc GETC4 ¥NO CHARACTERS 
0210 322306 STA IBUFC sREPLACE COUNT 
0213 7E MOV AyM sGET CHARACTER 
0214 23 GETC33 INX H sINCR POINTER 
0215 222106 SHLD IBUFP sREPLACE POINTER 
0218 E1 GETC4: POF H sRESTORE REGS 
0219 C9 RET sCARRY IF NO CHAR 


PUNCH A PAPER TAPE 


, 
5 
, 
5 
P 


O21A CD4401 DUMPS CALL READHL #START ADDRESS 


021D DASBO1 Jc ERROR #TOO FEW FARAM 
0220 EB XCHG 

0221 CD4401 CALL READHL *STOF ANDRESS 
0224 EB XCHG 

0225 13 INX D 

0226 ES PUSH H 

0227 CD4401 CALL READHL *sAUTOSTART ADDR 
022A ES XTHL sPUT ON STACK 
022B CD8502 CALL LEADR yFUNCH LEADER 
O22E CD8404 CALL LABEL sPUNCH LABEL 


START NEW RECORD» ZERO THE CHECKSUM 
PUNCH CR» LF» 2 NULLS AND COLON 
0231 CDDOO2 EWREC: CALL PCRLF sCRy LF» NULLS 


FIND THE RECORD LENGTH 


“a> er er DZ a> er er wer 
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0234 
0235 
0236 
0237 
0238 
0239 
023A 
023D 
O23F 
0242 
0243 
0246 
0247 
0248 
0248 
024C 
0240 
O24F 
0252 
0255 
0256 
0259 
025A 
0250 
O2S5E 
O25F 
0262 
0265 


0268 
0269 
026A 
026D 
O26E 
0271 
0272 
0273 
0275 
0278 
0279 
027C 


027F 


0282 


0285 
0286 
0288 
0288 
028C 
O28F 


3E10 


Cn9S502 


oD 

C25902 
CD46703 
C33102 


CA7902 
3c 

CD9S502 
CD6703 
CD8502 
C38601 


AF 
063C 
CDB802 
05 
C28802 
c9 


MOV AvE 
SUR L 
MOV CrA 
MOV ArD 
SBR H 
MOV BrA 
JC ERROR 
MVI AvyRLEN 
JINZ NEW2 
CMP c 
Jc NEW2 
MOV AvB 
ORA Cc 
JSZ DONE 
MOV ArC 
NEW2? MOV CyvA 
MVI B:0 
CALL FNHEX 
CALL PUNHL 
XRA A 
CALL PNHEX 
PMEM: MOV AyM 
CALL. PNHEX 
INX H 
DCR Cc 
JINZ FMEM 
CALL CSUM 
IMF NEWREC 
, 
¢ FINISHED, 
¢ LENGTH 00» 
’ AND A RECORD TYPE OF 
gy 
DONE? XRA A 
MOV BrA 
CALL PNHEX 
POF H 
CALL PUNHL 
MOV AvH 
ORA L 
MVI Ax90 
JZ DON2 
INR A 
DON2: CALL PNHEX 
CALL CSuUM 
CALL LEADIR 
JMP RSTRT 
; 
¢ FUNCH 
td 
LEADR: XRA A 
MVI B»é0 
NLDR? CALL POUT 
DCR BR 
JINZ NLOIR 
RET 


sCOMPARE LOW STOP 

» TO LOW FOINTER 
sDIFFERENCE IN C 
sCOMPARE HIGH STOF 

¢ TO HIGH POINTER 
sDIFFERENCE TO B 
sIMPROPER: Heol = DvE 
sFULL RECORD 


sCOMPARE TO E-L 
yFULL RECORD LENGTH 
sARE BOTH E-L AND 

¢ D-E ZERO? 

¥YES» REC LENGTH = 0 
+SHORT RECORD 
*RECORD LENGTH TO C 
sZERO THE CHECKSUM 
*PUNCH RECORD LENGTH 
sPUNCH H/L 


sPUNCH RECORD TYFE O 
sFUNCH MEMORY BYTE 
¢INCR. MEMORY FOINTER 
*DECR RECORD LENGTH 


¥FUNCH CHECKSUM 
¢NEXT RECORD 


FUNCH LAST RECORD, RECORD 
THE START ADRESS» 


o1 


¥ZERO CHECKSUM 
*ZERO RECORD LEN. 


sAUTOSTART H/L 
¥CHECK FOR 

§ AUTOSTART 

90 WITH CARRY 

¢NO AUTOSTART 


sRECORD TYFE 1 

*PUNCH CHECKSUM 
sPUNCH TRAILER 

sNEXT JOB 


BLANK HEADER AND TRAILER 


sTAPE NULLS 


7C 
CD9502 
7D 


CDA202 
Fi 


ES60OF 
C690 
27 
CE40 
27 


C3B802 


cnc402 
D630 
FEOA 
D8 
Dé07 
c9 
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PUNHL: MOV AvH 
CALL PNHEX 
MOV ArL 


“T} <a> <e> «> => 


“TZ <a> er «> o> 


x= > «> «> 


“a> <a> ~e 
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sFETCH H 
¢PUNCH IT 
sGET Ly PUNCH IT 


CONVERT A BINARY NUMBER TO TWO HEX 


CHARACTERS» 
NHEX3 PUSH FSW 
ADD B 
Mov ByA 
POP PSW 
PUSH PSW 
RAR 
RAR 
RAR 
RAR 
CALL PHEX1 
FOP PSW 
FUNCH A HEX CHARACTER 
LOWER FOUR BITS 
HEX1: ANI OFH 
ALT 144 
DAA 
ACI 64 
DAA 
JMP FOUT 
INFUT A HEX CHARACTER 
EX? CALL PIN 
sul ‘QO’ 
CPI 10 
RC 
SUI 7 
RET 


OUTPUT A BYTE 


PUNCH THEM, ADD TO CHECKSUM 


sSAVE ON STACK 
sADD TO CHECKSUM. 
*SAVE IT IN B 
sRETRIEVE BYTE 


sROTATE UPPER 
*TO LOWER 

sLEFT CHARACTER 
sRIGHT CHARACTER 


FROM 


yMASK UPPER 4 BITS 


FROM TAPE 


TO THE FUNCH 


POUT: PUSH PSW 

POUTW: IN PSTAT 
ANI POMSK 
JNZ POUTW 
POP PSW 
OUT PLATA 
RET 

’ 

§ INPUT A BYTE FROM PAPER TAPE 

; 

FIN? IN PSTAT 
ANI PIMSK 
JNZ PIN 
IN FDATA 
ANI 7FH 


= 


sSTRIP PARITY 
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¢ PUNCH CRy LF» NULLS ANI COLON 


’ 
O2D0 3EOD PCRLF3 MVI ArsCR 
02D2 CDB802 CALL FOUT 
O2DS 3E0A MVI ArLF 
0207 CDB802 CALL FOUT 
O2DA AF XRA a 
O2DB CDB802 CALL FOUT ¢TWO NULLS 
O2DE CDB802 CALL POUT 
O2E1 3E3A MVI Ar’3’ *>COLON 
O2E3 C3B802 JMP FOUT 


. 


Raa MM eCate aia axe A 
POPP PPS P TRE TET EF 


ee 5 
ENTRY FOR LOAD» EXECUTE 


a 
g 


O2E6 320006 LOAD: STA TASK 
O2E9 3E11 MVI Av17 *>TAPE READER ON 
O2EB CDB802 CALL FOUT 
O2EE CD4401 CALL READHL sOFFSET 
O2F1 220106 SHLD OFSET sSAVE IT 

§ PROCESS THE RECORD HEADING ON INPUT 

, 
O2F4 CDC402 HEAD: CALL PIN sINPUT FROM TAPE 
O2F7 FE3A CPI “3¢ > COLON? 
O2F9 C2F402 JNZ HEAD 9NOy TRY AGAIN 
O2FC 0600 MVI BrO *ZERO THE CHECKSUM 
O2FE CD3303 CALL PHEX *RECORD LENGTH 
0301 B7 ORA A 9IS IT ZERO? 
0302 CA4403 JZ ENDFL ¢YES» DONE 
0305 4F MOV CrA +SAVE REC. LEN. 
0306 CD2B03 CALL TAFEHL ¢GET H/L 
0309 EB XCHG sADDR TO DrE 
O30A 2A0106 LHLD OFSET 9GET OFFSET 
O30D 19 DAD D sADD 
OS0E CD3303 LOOP: CALL FPHEX sINFUT DATA BYTE 
0311 SF MoV Eva *SAVE BYTE 
0312 3A0006 LDA TASK +GET TASK 
0315 FES6 CPI “ye sSEE IF VERIFYING 
0317 7B MOV AvE sMOVE BACK 
0318 CA1CO3 JZ SKIP §JUMF IF VERIFYING 
O31B 77 MOV MrA sDATA TO MEMORY 
031C BE SKIF3 CMP ‘ sCHECK MEMORY 
031D €27603 JNZ MERROR +BAD MEMORY 
0320 23 INX H sINCREMENT FOINTER 
0321 OD DCR Cc *DECR RECORD LEN 
0322 C20E03 JNZ LOOP yNOT YET ZERO 
0325 CDéD03 CALL CHECK sPROCESS CHECKSUM 
0328 C3F402 JMP HEAD sSTART NEXT RECORD 


INPUT HyL AND RECORD TYPE FROM TAPE 


032B CD3303 APEHL? CALL FHEX yREAD H 

O32E 67 MOV HrA 

O32F CD3303 CALL PHEX sREAD L 

0332 6F MOV Lyra sREAD RECORD TYFE 


; 
» CONVERT 2 CHAR FROM TAFE TO ONE BINARY 
¢ WORD,» STORE IN A AND ADD TO CHECKSUM 


0333 
0336 
0337 
0338 
0339 
O33A 
033B 
O33E 
O33F 
0340 
0341 
0342 
0343 


0344 


0347 
0348 
O34B 
O34E 
O34F 
0351 
0354 
0357 
0359 
035C 
O3SF 


0362 
0364 


0367 
0368 
0369 
036A 


O36D 
0370 
0371 
0372 


0373 
0375 
0376 
0378 
0379 


CDADO2 
07 
17 
17 
17 
SF 
CDADO2 


C38601 


3E13 
C3B802 


78 
2F 
3c 
C39502 


CD3303 
AF 
80 
c8 


3E43 
o1 
SE4D 
FS 
CD6203 
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2 
y 


PHEX: CALL HEX sUFPER CHARACTER 
RLC ; 
RAL sMOVE TO UPFER 
RAL 
RAL +HALF 
MoV Era sSAVE IT 
CALL HEX sLOWER CHARACTER 
ADD E sCOMBINE BOTH 
MoV EvA sSAVE IT 
ADD B ,ADD TO CHECKSUM 
MOV BoA sSAVE IT 
MOV AvE sRETRIEVE DATA 
RET 


ROUTINE TO CHECK FOR AUTOSTART 


NDFL$ CALL TAPEHL AUTOSTART ADDRESS 
sAND RECORD TYPE 


PUSH FSW sSAVE RECORD TYPE 
CALL PHEX sINFUT CHECKSUM 
CALL TOFF sTAPE READER OFF 
POP PSW sRETRIEVE REC TYPE 
CPI 1 sAUTOSTART? 

JNZ RSTRT >NO 

LDA TASK sCHECK TASK 

CPI Ze S sEXECUTE? 

JZ JPCHL *YES» GO THERE 
CALL OUTHL gNO»e FRINT HL 

JMP RSTRT sNEXT TASK 


TURN OFF TAPE READER 


—j ser er «> 


OFF? MVI Ax19 
JMP POUT 


<> 


CALCULATE AND PUNCH THE CHECKSUM 


CSUM: MOV ArB sCHECKSUM TO A 
CMA sONE’S COMPLEMENT 
INR A #TWO’S COMPLEMENT 
JMP PNHEX sPUNCH CHECKSUM 


SEE IF CHECKSUM IS CORRECT (ZERO) 


OC) o> er <> 


HECK: CALL PHEX sINFUT CHECKSUM 
XRA A 
AbD B IS CHECKSUM ZERO? 
RZ ¢YESy RETURN 
PITH TIT P PEPE PPP TPIT FIP P ESTP FFP PE REPRE RTE ES 
, 
¢ ERROR MESSAGES 
’ 
MVI Ar ’C’ #CHECKSUM ERROR 
DB 1 *DB TRICK TO SKIP 
MERROR: MVI Ar‘’M’ #@M FOR BAD MEMORY 
PUSH PSW 
CALL TOFF sTAFE READER OFF 


198  8080/Z-80 ASSEMBLY LANGUAGE 


037C 
037D 
0380 
0383 


Fi 
CDOFO1 
CD1B01 
C38601 

y 
ODOA SIGN: 
4865782070 
ODOAOA 
452020206C 
ODOA 
47202D2067 
ODOA 
52202N2072 
ODOA 
2020202028 
ODOA 
5620202076 
206D656D6F 
57202D2077 
2028616E64 
2877697468 
ODOAD0O 


ODOA4SSE74LMESG? 
OnOoA0O 


, 
9 FUNCH 
, 

ES L 

DS 

116804 

CD7301 

CDACO1 

CD0402 LABL13 

DABFO4 


ABEL? 


7E NEXTC? 
CDB802 

23 

on 

C2AF04 

AF 

CDB802 

C38F04 


FOP PSW 

CALL OUTT sPRINT ERROR TYPE 
CALL OUTHL sPRINT H/L 

SMF RSTRT 

DB CReLF 

DB ‘Hex Parer-tare Pprodram’ 

DB CReLFeLlLF 

DE ‘E - load and execute’ 

DB CReLF 

DB ‘G - go to addresses given’ 
DB CReLF 

DB ‘R - read tare into memory’ 
DB CReLF 

DB 4 (with ortional offset)’ 
DB CReLF 

DB ‘VY - verify tare adainst’ 
DB ’ memory’ sCReLF 

DB ‘W - write rarer tare’ 

DB ‘ (and label)’ sCReLFs’ ¥, 
DB ‘(with ortional autostart)’ 
DE CRreLF»0 

DB CRryLF»’Enter leader message’ 
DB CRryLFr0 


READABLE LABELS ON FAPER TAPE 


PUSH H 

PUSH a] 

LXI DyLMESG sLABEL MESS. 
CALL SENDIM sSEND IT 

CALL. INPLN GET A LINE 
CALL GETCH sGET CHARACTER 
JC LABL2 sDONE ON CARRY 
SBI 20H sASCII BIAS 

JC LABL1 9< SPACE 

CPI 63 

JNC LABL1 sTOO BIG 

MOV LyvA 

MOV Era 

MVI H»O 

MVI Dyv0 

DAD H sDOUBLE IT 

DAD H +>TIMES 4 

DAD D sTIMES FIVE 
XCHG 

LXI H» TABL 

DAD D 

MVI CrS 

MOV ArM 

CALL FOUT 

INX H 

DCR Cc 

JINZ NEXTC 

XRA a 

CALL POUT 

JMP LABL1 yNEXT CHARACTER 


O4BF 
04C2 
04C3 
04C4 


04C5 
O4CA 
O4CF 
04D4 
04D9 
O4DE 
04E3 
O4E8 
O4ED 
O4F2 
O4F7 
O4FC 
0501 
0506 
OSOB 
0510 
0515 
OS1A 
OS1F 
0524 
0529 
OS2E 
0533 
0538 
0530 
0542 
0547 
054C 
0551 
0556 
OSSB 
0560 
0565 
O56A 
OS6F 
0574 
0579 
OS7E 
0583 
0588 
o58D 
0592 
0597 
O59C 
OSA1 
O5AS6 
OSAB 
OSBO 
OSBS 
OSBA 
OSBF 
OSC4 
osc9 
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CD8502 LABL2: CALL 
D1 POP 
E1 POP 
c9 RET 
, 
OQOOOOOOOOOTABL DB 
OQOOOCFCFOO DB 
0007000700 DB 
28FE28FE28 DB 
4689FF 8972 DB 
462610C8C4 DB 
6C92AC4O0AON DB 
0004030300 DB 
0030428100 DB 
0081423000 DB 
8850F85088 DR 
08087E0808 DB 
0080703000 DB 
0808080808 DB 
00COC00000 DR 
4020100804 DB 
7EALB89857E DB 
8482FF8080 DB 
C2A1918986 DB 
4289898976 DB 
OCOA89FFS8S DB 
5789898971 DB 
7E89898972 DB 
0101F 90503 DB 
7689898976 DB 
46898989 7E DB 
OOD8D80000 DB 
0080763600 DB 
1028448200 DB 
2828282828 DB 
8244281000 DB 
0601B90906 DB 
7EB1I9DILOE DB 
FEO90909FE DB 
B81FF898976 DB 
7E81818142 DB 
81FF81817E DB 
FF89898989 DB 
FFO9090901 DB 
7E81919172 DB 
FFO80808FF DB 
OO81FF8100 DB 
6080817F01 DB 
FFO81422C1 DB 
FF80808080 DB 
FFO20CO2FF DB 
FFO23C40FF DB 
FF818181FF DB 
0509090906 DB 
7EB1LA141BE DB 
FF19294986 DB 
4689898972 DB 
O101FF0101 DE 


LEADR 


Or Or Ov Or O 
Ov» Ov» 2072920720 
Or 7» QO» 7e OO 
254240» 254740 
1372559137114 
7Ov 38x 16% 2002196 
1089146917264 160 
Ov 4 3% 3y O 
Ov &0% 6691299 O 
Ov 129766» 450% O 
134980» 248780» 
8» 8» 126%8% 8 
Or 128112748, O 
8» 8» 8s 8 8 
Or» 192919270» 0 
649 32% 146% Br 4 
126916191379133%126 
1329130%2557128%7128 
19471461714591379134 
66» 13791379137%9118 
12» 1091377255136 
103¥137%13791379113 
1269137913791379114 
ly ly 2499Syr 3 
118%1379137%137%118 
70% 137913791379126 
Or 2169216909 O 
O» 12811854» 0 
16% 40% 68% 1300 
40» 40% 40% 40% 40 
1307468 40% 16% O 
S&y 1s 18599 6 
1246912991579145914 
25499» Pr 9» 254 
129» 25591379137%7118 
126912991299129% 66 
1299255 %12991299126 
255 913791379137%9137 
25599» F F v1 
1267129914591459114 
25578» 8r 8» 255 
Ov 1299255912990 
96» 1289129912791 
25598» 20% 34% 193 
25591289128%128%128 
25592» 12% 2% 255 
25592» 60» 64% 255 
255 9129912991299255 
Se 9v Gr Oe & 
1269129161945» 190 
255925» 41% 73» 134 
70x 137913771379114 
dy ly» 2551» 1 


“SP “Gd “ED GP Er Er EP “ED Gr “Gh GD GP GP ar <a> E> “ED Er er EP E> Er E> “EP Er WP “Gr Er SD “ED “E> “E> “E> er “ED “E> “E> “ED “Gr “Er “ED “Er “Er “ED “Er GD “E> er “ED “ED ~e>r “ED “Or 
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199 


i<~ +2Hw A SNK HS 


VV HAwWer DONAU SWNHK ON 


200 


8080/Z-80 ASSEMBLY LANGUAGE 


OSCE 
OSD3 
o5D8 
ospp 
OSE2 
OSE7 
OSEC 
OSF1 
OSFS 
OSFB 


0600 
0601 
0603 


0621 
0623 
0624 


0638 


7F8080807F 
OF 30CO300F 
7F8070807F 
C3241824C3 
0304F 80403 
C1A1918987 
OOFF818181 
0408102040 
818181FF00 
0C0201020C 


0000 


Symbols? 


oo1l1 
0170 
0367 
0268 
0214 
0129 
0621 
O1E0 
0103 
O4BF 
O30E 
O4AF 
0601 
0110 
O2A2 
O2E6 
02B8 
0149 
0010 
031C 
032B 


CDATA 
CONTIN 
CSUM 
DONE 
GETCS 
HEX1 
IBUFP 
INPLC 
INPUTT 
LABL2 
LOOP 
NEXTC 
OFSET 
OUTW 
PHEX1 
PLOAD 
POUT 
RDHL2 
RLEN 
SKIP 
TAPEHL 


TASK 
OFSET: 


STACK: 
IBUFP? 
IBUFC: 
IBUFF 3 


036D 
ooon 
0008 
0344 
0218 
O2AD 
O1B4 
O1DA 
O1AB 
0285 
0376 
0134 
011B 
0200 
0333 
0259 
O02B9 
O15E 
0186 
0621 
0600 


CHECK 
CR 
CTRH 
ENDFL 
GETC4 
HEX 
INPL2 
INPLE 
JPCHL 
LEADR 
MERROR 
NIB 
OUTHL 
PCRLF 
PHEX 
PMEM 
POUTW 
RDHL4 
RSTRT 
STACK 
TASK 


1279128912891289127 
15° 48% 192%48% 15 
1279128911291289127 
195736 24% 34» 195 
32 4r 24894 93 

193916191459137%9135 
Ov 255%912991299129 


“> “E> “E> Sr <a> “E> “er <> er er 


IWF ANXK ECS 


COMSK 
CSTAT 
DON2 
GETC2 
HEAD 
IBUFF 
INPLB 
INPLN 
LABL1 
LMESG 
NEWREC 
NNULS 
OUTT 
PDUMP 
PIN 
POMSK 
PUNHL 
READHL 
SIGN 
TABL 


4» 8» 16% 32% 54 

129 9129912992550 

12» 2% tds 2% 12 

1 sSAVE IT 

(0) sLOAD OFFSET 

30 s>STACK SPACE 

2 s#BUFFER POINTER 

1 *>BUFFER COUNT 

20 ¢INPUT BUFFER 
0001 CIMSK 0002 
O1EE CRLF 0010 
OO7F DEL 0279 
016B ERROR 0208 
0204 GETCH O2F4 
0623 IBUFC 0624 
01D0 INPL3 O1F8 
O1BC INPLI 0O1AC 
0484 LABEL 048F 
OOOA LF O46B 
024C NEW2 0231 
0288 NLDR 0000 
0120 OUTHX O10F 
0007 FPDATA O21A 
0001 PIMSK 02C4 
0295 PNHEX 0080 
0006 PSTAT 0290 
0168 RDHLS 0144 
0173 SENDM 0386 
0100 START 04C5 
0362 TOFF 
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This program generates tapes with a modified Intel format. A typical 
record is shown in Figure 9.1. 


record header (colon 


record length (2 characters) 
address (4 characters) 
record type 00 or 01 
aes data bytes ei oe (2 characters) 


: 10010000C37D01DB10E601CA0301DB11E67FC9F5FF 
Figure 9.1. The hex tape format. 


In this example, the record length is 10 hex, the address is 100 hex, the 
record type is 00, the first data byte is C3, the last data byte is F5 hex, and 
the checksum is FF hex. This is the format used by the CP/M assemblers 
ASM and MAC to generate HEX files. 

Each record starts with a colon and is followed by the hex-encoded 
data. Since the data are encoded in ASCII, two bytes on the tape are needed 
to represent each original byte. Two hex characters, representing the record 
length, follow the header character. This hex value gives the actual number 
of data bytes contained in the record. It does not include the other characters 
in the record which designate the record address, the record type, and the 
checksum. A zero value for the record length is used for the last record to 
indicate the end of the file. 

The record address, the address of the first byte in the record, comes 
next. This address is encoded into four hex characters, high-order byte first. 
The next item is the record type; it consists of two characters and can be 00 
or 01. The value is usually 00, however; 01 is used for the end-of-file record 
for autostart tapes. 

The data from memory are encoded next. Two bytes on the tape repre- 
sent each data byte. The checksum byte is the last item in the record. It is 
formed by taking the two’s complement of the sum of all the previous bytes 
in the record (in binary form). A carriage return, line feed, and optional 
nulls follow the checksum. 

When the hex tape is loaded into the computer, the bytes within each 
record including the checksum are added together. The checksum byte is 
formed from the two’s complement of the original sum. Since the sum ofa 
number and its two’s complement is zero, the total at this point should be 
zero. A nonzero result indicates an error. 

The last record in the file has a record length of zero. This end-of-file 
record can indicate an autostart address in place of the usual record address. 
The computer can branch to this autostart address after the program is 
loaded. The record type in this case is 01— the end-of-file record. 
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Since the tape is written with an ASCII-encoded format, it is easy to 
read. Listing 9.2 shows the first part of the monitor made with the monitor 
itself. 


Listing 9.2 A hex dump of the bedinning of the monitor. 


+ 1O010000C37D01DBLIOESOICAOSZOIDBIIES7FCOFSFF 
310011000DB10E602CA1001F10311C94CCD20014D0C 
310012000791 F1iF 1 F1FCD290179E60FC49027CE40EA 
31001300027C30FO1N630D8FE173F D8FEOASFDOD6CE 


The disadvantage of this format is that the tape takes twice as long to 
make and twice as long to read as a corresponding binary tape. A BASIC 
interpreter that loads in 20 minutes from a binary format would take 40 
minutes to load from hex format. 

You may want to reassemble the hex tape routine for some other 
memory location, or you may want to incorporate it into your system 
monitor. But wait until you’ve learned about the binary tape monitor shown 
later in this chapter before you do. 

Type in the hex program, assemble it, and start it up by branching to the 
beginning. A list of commands will be printed as a guide to operation. 


Hex paper-tape program: 


load and execute 

go to address given 

read tape into memory (with optional offset) 
verify tape against memory 

write and label paper tape (with optional autostart) 


e<7On 


Console input is buffered just as it is in our system monitor. In fact, you will 
notice that many of the monitor I/O routines have been duplicated in this 
tape program. To create a tape, type the letter W (for write), the start 
address, and an optional autostart address. Finish the line with a carriage 
return. Typing errors can be corrected as usual with a DEL or backspace 
key. When the statement ‘‘Enter leader message” appears, either type the 
characters that you want on the tape leader, or just type a carriage return to 
skip the title. 

After the tape has been made, it should be verified. Type the letter V 
and a carriage return. If you have a Teletype with an automatic tape reader, 
the computer can turn it on at the beginning and turn it off at the end. This 
is accomplished by sending a control-Q at the beginning and a control-S at 
the end. Each entry on the tape will be compared to the corresponding value 
in memory. If a checksum or verify error is detected, the process will be 
terminated. The appropriate error message and the address of the error will 
appear. In the case of a checksum error, the address is not meaningful. 

A tape can be loaded into memory by typing the letter R (for read) and 
the optional offset value. This offset is added to the record address, after the 
record address has been added into the checksum. An offset of 1000 hex will 
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load a program 4K bytes higher than the regular address. An offset of FOOO 
hex will load the program 4K bytes lower. If you want, the computer will 
branch to the autostart address after the tape has been loaded; simply type 
an E (for execute) rather than an R. 

If a leader message has been punched on the tape, it is not necessary to 
position the tape past this message. The loader routine is looking for a colon 
to indicate the start of a record. But the colon symbol will never appear in 
the label itself. There is a GO command so that you can easily leave the tape 
program. Type the letter G (GO) and the address. 


A TAPE-LABELING ROUTINE 


The assembly language instructions that punch readable labels on paper tape 
begin at LABEL and continue on down to TABL. The data used by this por- 
tion starts at TABL and goes down to TASK. The characters that are avail- 
able include the complete set of ASCII characters from the blank (20 hex) 
through the underline (5F hex). The uppercase letters are included but the 
lowercase letters are not. One line of data in the source program is used for 
each character punched on the tape. The characters can be identified by the 
comment at the end of the line. The lines of data are arranged in sequence 
corresponding to the ASCII character set. The characters punched on the 
tape are generated in a five-by-eight matrix, with a row of blanks between 
the characters. 

When the label subroutine is called, it first prints a message requesting 
input. In response, the user enters one line of characters and concludes the 
line with a carriage return. The message is then punched on the tape. Each 
ASCII character is obtained from the console input buffer as needed. The 
ASCII character is converted to binary by subtraction of an ASCII blank. 
The result is then used as a pointer to find the corresponding entry in the 
table. This is done by multiplying the binary value by 5 and adding it to the 
table address. The next five bytes of the table are then sent to the punch. 
The complete set of characters is shown in Figure 9.2. 


Figure 9.2. The set of letters and numbers produced by HEXMON. 
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The label subroutine with its necessary I/O routines can be removed 
from the tape program and used separately. It can be placed into high mem- 
ory and called by another program such as a BASIC interpreter. 


A BINARY TAPE MONITOR 


The hexadecimal program given in the previous section is useful for paper 
tape. But a binary tape routine is much more suitable for magnetic tape. 
With a magnetic tape format, the tape cannot be visually inspected. There- 
fore, there is no advantage in coding the data in hexadecimal format. 

Files are organized into records just as they are with the hex program. 
Each record starts with a record header, then continues with the record 
length, the address, the data, and the checksum. But the binary format isa 
bit different. As shown in Figure 9.3, there are three types of records: a 
header record, a data record, and an end-of-file record. The first record in 
the file is the file-header record. It begins with a 55-hex character. An 
optional filename appears next. The record header ends with a carriage- 
return character. 


Header Record 55H Carriage Return 
EOF Record 74H Autostart Addr. 


Figure 9.3. Three different record types are used with the binary tape 
format: A header record, one or more data records, and an 
end-of-file record. 


The data record follows the header record. It starts with a 3C-hex 
header byte, a record-length byte, and two bytes giving the record address. 
The record address is written with the low-order byte first. The data bytes 
appear next, and then the checksum concludes the record. 

With this format, the checksum byte consists of the sum of the data 
record bytes rather than the two’s complement of the sum as used with the 
hex format. This checksum includes the record address and the data bytes, 
but it does not include the record length. The record length is not needed, 
since an incorrectly read record length will point to an incorrect byte that is 
to be used for the checksum. 

The end-of-file record is four bytes long. It begins with a 74-hex char- 
acter. It is followed by the autostart address, written as low byte, high byte. 
The fourth byte in this record is the checksum of the two-byte autostart 
address. 

The routine given in Listing 9.3 is not a complete program. It is meant 
to be added to the end of the system monitor developed in Chapter 6. The 
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I/O and conversion routines of the monitor are used whenever possible. If 
you want to use it as a stand-alone program, you will have to include the 
necessary I/O routines. The addition of the tape program to the monitor will 
increase its size to one-and-a-half K bytes. 

Add the new instructions to the end of the monitor, then change the 
monitor command-branch table for the letter T (tape) 


DW TAPE T 


so that a command line starting with the letter T will cause a branch to the 
new tape routines. 


Listing 9.3. Binary tare routines, 


§ LOCATIONS IN THE STACK AREA 


S7C6 = FBUF EQU IBUFF+32 #FILENAME BUFF 
S7E6 = OFSET EQuU FBUF+20H $LOAD OFFSET 
S7E8 = TASK EQuU OFSET+2 
S7E? = LFLAG EQU TASK+1 s#LOAD-ERROR FLAG 
y 
00SS = SBYTE EQU SSH sSYNC BYTE 
003C = RHEAD EQU 3CH sRECORD HEADER 
0074 = EOF EQu 74H sEND OF FILE 
, 
0006 = PSTAT EQU 6 sPUNCH STATUS 
0007 = PDATA EQU PSTAT+1 #PUNCH DATA 
0001 = PIMSK EQU 1 sINPUT MASK 
0080 = POMSK EQU 80H sOUTPUT MASK 
; 
j 
SBFA 210000 TAPES LXI HrO 
SBFD 22E657 SHLD OFSET sZERO OFFSET 
SC0O CN2559 CALL GETCH > COMMAND 
, 
> TAPE-COMMAND FROCESSOR 
’ 
SCO3 FE4S CPI ‘ES 
SCOS CAD2SC JZ TLOAD sLOAD AND EXEC 
SCO8 FE4C CPI ft 
SCOA CAD25C JZ TLOAD *LOAD 
ScoD FE4D CPI “M’ 
SCOF CA805D JZ TMAKE sMAKE TEST TAPE 
5C12 FE4F CFI ‘0’ 
5€14 CACASC JZ OFFST sOFFSET LOAD 
SC17 FES4 CFI oat Na 
8C19 CA9ASD JZ TTEST +TAPE TEST 
SC1C FESS CPI “Vue 
SC1E CAD25C JZ TLOAD +VERIFY TAPE/MEM 
5sC21 FE44 CFI ‘Dp’ sDUMP TO TAPE 


SC23 C2D459 JNZ ERROR 


- 
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» DUMP MEMORY TO TAFE IN 8-BIT BINARY FORMAT 


SC26 CD8659 CALL RDHLDE sADDRESS LIMITS 
9C29 ES PUSH H sSTART ADDR 
SC2A CD9DS9 CALL READHL +s#AUTOSTART 
SC2D E3 XTHL SSWITCH WITH Hol 
SC2E CD88sc CALL LEADR +TAPE LEADER 
$C31 3E55 MVI A»ySBYTE $SYNC BYTE 
5C33 CD935C CALL TOUT 
9C36 CD2559 TOMP: CALL GETCH sFILE-NAME CHAR 
SC39 DA425C Jc PD4 sFILENAME END 
SC3C Ch93SC CALL TOUT sSEND TO TAPE 
SC3F C3365C JMP TOMP *NEXT CHAR 
SC42 3E0D PD43 MVI A»CR 
5044 CD93SC CALL TOUT sPUT CR ON TAPE 
5C47 3E3C POO? MVI AyRHEAD #RECORD HEADER 
SC49 CO93SC CALL TOUT sPUT ON TAPE 
SC4C 7B MOV ArE 
SC40D 95 SUB L 
SC4E 3C INR A sRECORD LENGTH 
SC4F 4F MOV CrA 
SCSO CD935C CALL TOUT sFUT ON TAPE 
SCS3 7D MOV Ark 
5C54 CD93SC CALL TOUT gL TO TAPE 
SCS7 45 MOV Berl »START CHECKSUM 
SCS8 7C MoV ArH 
SCS9 CDI3SC CALL TOUT §H TO TAFE 
SCSC 7E a Ub MOV ArM sGET DATA 
ScSD CD93SC CALL TOUT *SEND TO TAPE 
5C460 OD DCR Cc sRECORD COUNT 
5C61 CA685C JZ PD2 + DONE 
5C464 23 INX H +BUMP POINTER 
9C65 C35c5C JMF PD1 gNEXT BYTE 

’ 

§ END OF RECORD 

y 
5SC68 78 PD23 MoV ArB sGET CHECKSUM 
SC469 CD93SC CALL TOUT sSEND IT 
Scé6C 7C MoV ArH 
SC46D BA CMP D sEND OF FILE? 
SC6E CA7SS5SC JZ PDS 9YES 
SC71 23 INX H 
5C72 C3475C JMP PDO sNEXT RECORD 

’ 

¢ END OF FILE 

’ 
SC75 3E74 PDS? MVI Av EOF 
9C77 CD93SC CALL TOUT sSEND IT 
SC7A E1 POP H sAUTOSTART ADDR 
SC7B 7D MOV ArL >LOW 
Sc7C Ci93sc CALL TOUT sSEND IT 
SC7F 45 MOV Bel ySTART CHECKSUM 
SC80 7C MOV AvH sHIGH 
SC81 CD935C CALL TOUT sSEND IT 
5C84 78 MOV AvB § CHECKSUM 
SC85 CD93SC CALL TOUT sSEND IT 


5C88 
9C89 
SC8B 
SC8E 
SC8F 
SC92 


5C93 
SC94 
SC9S 
SC96 
SC97 
5C98 
SC9A 


Scg9c 
SC9OF 
SCAO 
SCA2 


SCA 
SCAG 
SCA7 
SCA8 
SCA 


SCAA 
SCAC 
SCAE 
SCAF 
SCE1 


SCE2 
SCB4 


SCBS6 
SCB9 
SCBB 


C2985C 
F1 
11307 
c9 


CDB25C 
FS 
80 


C2R25C 
DBO7 
c9 


[7 a> er 
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MAKE A LEADER/TRAILER 


EADR: XRA A 
MVI Br72 

NLDR3 CALL TOUT 
DCR B 
JNZ NLDR 
RET 


—j er er we 


OUT? PUSH PSW 
ADn B 
MOV BA 
FOP FSW 

POUT: PUSH FSW 

FOUTW: IN PSTAT 
ANI POMSK 

y 

§ NEXT LINE MAY NEED TO 
JINZ POUTW 
FOF FSW 
OUT FDATA 
RET 


—{ eo <e> > 


‘> a> <> 


se> <a> <a> 


OUTFUT BYTE TO TAFE, 


INPUT BYTE FROM TAPE 
ADD TO CHECKSUM 


IN43 CALL PIN 
FUSH PSW 
ADD B 
MOV BrA 
POP FSW 
SEND 
ANI 7FH 
CPI eed 
RC 
OUT CDATA 
RET 
IN: IN FSTAT 
ANI PIMSK 
NEXT LINE MAY NEED TO 
JINZ PIN 
IN FDATA 
RET 
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ON TAPE 
sGET A NULL 


¢# OF NULLS 
sSEND NULL 


Ann TO CHECKSUM 


§TO CHECKSUM 
sPUT BACK 


sSTATUS 


BE JZ POUTW 
*NOT READY 


sSEND BYTE 


sGET BYTE 


sADD TO CHECKSUM 
sPUT BACK 


TO CONSOLE IF NOT A CONROL CHARACTER 


> CONTROL 


sSTATUS 


BE JZ PIN 
sNOT READY 
sGET BYTE 
sKEEP 8 BITS 


LOOK FOR HEADER ON PAPER TAPE 
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3E11 
CD97SC 
CDB25C 
FESS 
C2C15C 
C9 


57 
CD9DS9 
22E657 
7A 


32E857 


32A657 
CDBCSC 
210657 
7E 
FEOD 
CA1ICSD 
11A457 


CDA3SC 


C2Cco0SD 


FPIN4$ 


PINS? 


LOAD 


oww = 


FFST? 


TLD: 


TLDS: 


INPUT 


— <> <> = 


LD23 


<a> <a> <a> ~e> 


TLD43 


MVI A»CTRA 
CALL POUT 
CALL FIN 
CFI SBYTE 
JNZ PINS 
RET 


s“Q 

sTURN ON READER 
sGET BYTE 

sSYNC BYTE? 
yNO» TRY AGAIN 


A TAPE WITH 16-BIT OFFEST 


sSAVE TASK 
sGET OFFSET 
sSAVE IT 
*RESTORE TASK 


sSAVE COMMAND 
sFILENAME BUFFER 
sGET A ZERO 
sRESET FLAG 
sREAD FILENAME 
sEND OF FILENAME 
sPUT IN FBUF 


sNEXT CHARACTER 
sFIND HEADER 
sFILENAME BUFFER 
91ST CHARACTER 


¢NO FILENAME 
¢INPUT BUFFER 


FUT IN IBUF 
sBYTE FROM TAPE 
sPUT IN IBUFF 
yNO FILENEME 
sCOMP FILENAMES 


sNEXT CHARACTER 


MOV DvA 
CALL READHL 
SHLD OFSET 
MOV AD 
VERIFY BINARY TAPE 
STA TASK 
LXI Hy F BUF 
XRA A 

STA LFLAG 
CALL GETCH 
Jc TLDS 
MOV MrA 
INX H 

JMP TLD1 
MVI A»yCR 
STA I BUFF 
CALL PIN4 
LXI Hy F BUF 
MOV AsM 
CFI CR 

JZ TLO 
LXI Dy IBUFF 
FILENAME FROM TAPE» 
CALL TIN4 
STAX 0 

INX D 

CFI CR 

JZ TLD4 
CMP M 

INX H 

JZ TLD2 


FILENAME ENTERED FROM 
DOESN’T MATCH NAME ON 


MVI Ay ‘F’ 
STA LFLAG 
JMP TLD2 
XRA A 

DCX D 
STAX D 

LDA LFLAG 
ORA A 

JNZ FNERR 


CONSOLE 
TAPE 


sSET ERROR FLAG 


> CHECK 
9 ZERO? 
sFILENAME ERROR 


FLAG 
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CDA3SC TLOS CALL TIN4 sBYTE FROM TAFE 
FE74 CFI EOF 

CA605D JZ EXEC > DONE 

FE3C CPI RHEAD sRECORD HEADER 
C21c5D JNZ TLO sTRY AGAIN 
CDA3SC CALL TIN4 sRECORD LENGTH 
4F MOV CrA sPUT IN C 

CDASSC CALL TIN4 sADDRy LOW BYTE 
oF MOV EvA sINTO E 

47 MOV BrA sFUT IN CHECKSUM 
CDASSC CALL TIN4 sADDR»e HIGH BYTE 
57 MoV DvA sINTO D 

2AE657 LHLD OFSET sGET LOAD OFFSET 
19 DAD D sADD TO ADDRESS 
3AE8S7 LDA TASK sGET TASK 

57 MOV DvA sPUT IN D 

CDASSC TL13 CALL TIN4 sDATA BYTE 

SF MOV Eva sSAVE IN E 

7A MOV ArD sCHECK THE TASK 
FES6 CFI “Vy? > VERIFYING? 

7B MOV ArE *GET BYTE AGAIN 
CA4A5D JZ SKIP sVERIFYINGs SKIP 
77 MOV MrA ¢INTO MEMORY 

BE SKIF? CMF M 91S IT THERE? 
C2AESD JNZ FERROR #NO 

23 INX H ¢INCR ADDRESS 

on DCR c sRECORD COUNT 
C23ES0 JNZ TL1 ¢NEXT BYTE 


END OF RECORD, GET CHECKSUM 


<> a> ee 


48 MOV CoB sCHECKSUM TO C 
CDA3SC CALL TIN4 sTAPE CHECKSUM 
B9 CMF c 9THE SAME? 
CA1ICSD JZ TLO sYES 

3E43 CSERR: MMVI Ar‘C’ sERROR 

C3455A JMP ERR2 


END OF TAPE» GET AUTOSTART ADDRESS 
SEE IF EXECUTING 


IT] -e> <a> <> <> 


CDA3SC XEC; CALL TIN4 sSTART» LOW 

6F MOV LvA sFUT IN L 

47 MOV BrA §START CHECKSUM 
CDA3SC CALL TIN4 +START,s HIGH 
67 MOV HA sPUT IN H 

48 MOV Cy+B *GET SUM 
CDA35SC CALL TIN4 sREAD CHECKSUM 
B9 CMP Cc + SAME 

C25B50 JINZ CSERR y9NO 

COB4SD CALL POFF sREADER OFF 

7A MOV ArD sCHECK TASK 
FE4S CFI SE s EXECUTING? 
CA7FSD JZ PCHLT sYES 

3E45 MVI Ay‘E’ sEXEC ADDRESS 


C3455A JMP ERR2 
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THE NEXT LABEL CAN BE PLACED AFTER 
THE LABEL CALLS/GO NEAR THE BEGINNING 


<a> <a> “ap ser er “T} ser <a> en <e> 


SD7F E9 CHLT$ PCHL 
MAKE BINARY TEST TAFE» EACH BYTE 
IS ONE LARGER THAN FREVIOUS BYTE 
WITH OVERFLOW, OO IS AFTER FF 
S080 21F401 TMAKE’ LXI H»500 sABORT CHECK 
SD83 7A TMAK2: MOV Ard sGET A BYTE 
5084 CD93SC CALL TOUT sSEND TO TAPE 
SD87 14 INR f) *INCREMENT IT 
SD88 2B ncx H *BECR COUNT 
SD89 7C MOV ArH 
SD8A BS ORA L sSEE IF ZERO 
SD8B C2835D JINZ TMAK2 *NO 
SD8E Ch2558 CALL INSTAT s#TERMINATION? 
9D91 CA80SD JZ TMAKE ¢NO 
5D94 Ch1558 CALL INPUTT #°X FOR ABORT 
SD97 C3805D JMF TMAKE »NO 


; 

» READ BINARY TEST TAPE 

> EACH BYTE MUST BE ONE LARGER 
» THAN THE PREVIOUS ONE 
; 
T 


SD9A CUB2SC TEST? CALL PIN sGET A BYTE 
SD9D 37 MOV DA sSAVE IT 
SD9YE COB25C TTEST23 CALL PIN sNEXT BYTE 
SDA1 14 INR D yINCR FIRST 
SDA2 BA CMP 0D *SAME? 

SDA3 CAVESD JZ TTEST2 *YES 

SDA6 3E43 MVI Ay’C’ *NO 

SDA8 CD2A58 CALL OUTT *C FOR ERROR 
SDAB C39ASD JMF TTEST sSTART AGAIN 


TAPE ERROR» PRINT B AND ADDRESS 


SDAE CDB45D ERROR: CALL POFF 


SDB1 C3435A JMP ERRB 

; 

> TURN OFF TAFE READER 

, 
SDB4 3E13 POFF?: MVI ArCTRS *READER OFF 
SDB6 C3935C JMP TOUT 

, 

9 FILENAME ERROR» PRINT ACTUAL 

» FILENAME ON TAPE 

, 
SDBY 205472793AEMESS: [IB ‘ Trys %90 
SncoO CDB45D FNERR$ CALL POFF sREADER ON 
S0C3 11B95D LXxI DyEMESS sERROR MESSAGE 
SDCé CD3BS9 CALL SENDM sSEND IT 
SDC9 11A657 LXI Dy IBUFF ¢FILE NAME 
SDCC C33B59 JMF SENIIM sSEND IT TOO 


<> 


SDCF END 


Symbols? 


SBO7 
SAED 
0008 
0011 
5858 
S90F 
0008 
OO7F 
S9SE 
SAAS 
OO1B8 
IAGS 
S80F 
SOFS 
5B73 
OODB 
S8F1 
S8DD 
9825 
SB89 
S7E9 
SA3O 
SAAO 
586A 
SBSA 
5844 
S9DF 
582A 
SD7F 
sC75 
0001 
SDB4 
5C98 
S9B7 
S99D 
SBCC 
0055 
SAC? 
SD4A 
589C 
SCA3 
SCFB 
S083 
SA00 
SEIS 
SASS 


ADMF2 
ALOD2 
BACKUP 
CDATA 
COLD 
CRLF 
CTRH 
DEL 
DUMP4 
ERR2 
ESC 
FILL2 
GCHAR 
HEX1 
HMATH 
INC 
INPL3 
INPLI 
INSTAT 
JUST2 
LFLAG 
LOAD4 
MOVIN 
NPAGE 
OPORT 
OuT4 
OUTHL 
OUTT 
PCHLT 
PDS 
PIMSK 
POFF 
POUTW 
RDHL4 
READHL 
REFL3 
SBYTE 
SEARS 
SKIF 
TABLE 
TIN4 
TLD2 
TMAK2 
TSTOP 
VERM2 
ZERO 
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5B23 
FFF? 
SB4C 
0011 
5806 
SUSE 
0011 
5945 
5967 
5A43 
5160 
SA6C 
5939 
5991 
57A5 
580C 
5919 
580 
5B3D 
5B92 
SAOD 
5A37 
5878 
SCCA 
5800 
oon3 
S9EC 
5981 
5C47 
5C42 
SCE2 
0080 
0006 
59C1 
SA4E 
5803 
SAAD 
SAAA 
57A0 
SBFA 
SDAC 
5012 
5180 
SDA 
SBF3 


ADMP3 
AFOS 
BIT2 
CLATAO 
COUT 
CSERR 
CTRQ 
DUMF 
DUMPS 
ERRB 
EXEC 
FILL3 
GETC4 
HHLDE 
IBUFC 
INLN 
INPLB 
INFLN 
IFORT 
JUSTS 
LOAD 
LOADS 
MSIZE 
OFFST 
ORGIN 
OUTC 
OUTHX 
PASC2 
PbO 


“PLA 


FIN 
FOMSK 
FSTAT 
RDHLS 
REGS 
RESTRT 
SEAR2 
SEARCH 
STACK 
TAPE 
TLO 
TLDA 
TMAKE 
TTEST 
VERM3 


SB26 
SADS 
SB4A 
SASE 
ooon 
0010 
0013 
5948 
SDB9 
S9D4 
57C6 
SA7S 
5925 
SA7C 
S7AG6 
0001 
59701 
581B 
SBAS 
SC88 
SA10 
SA96 
59C4 
S7E6 
982B 
5812 
S9ES3 
5983 
scsc 
0007 
SCBC 
S7A0 
5Bé63 
5989 
SBBA4 
00c? 
SABS 
S93B 
5800 
S7E8 
SDUGE 
SCE7 
0018 
SD9E 
3831 


ADMP4 
ASCII 
BITS 
CHEKM 
CR 
CSTAT 
CTRS 
DUMF2 
EMESS 
ERROR 
FRUF 
FILL4 
GETCH 
HLDEBC 
IBUFF 
INMSK 
INPLC 
INPUT2 
JERR 
LEADR 
LOAD2 
MOVIN 
NIB 
OFSET 
OUT2 
OUTH 
OUTLL 
FASC3 
PD. 
FDATA 
PIN4 
FORTN 
PUTIO 
RDHLD2 
REPL 
RETC 
SEARS 
SENDM 
START 
TASK 
TL1 
TLOS 
TOP 
TTEST2 
VERS 


SBO4 
SB2C 
SAN? 
5809 
S9DC 
0010 
0018 
S94B 
0074 
SA42 
SASD 
Snco 
SA08 
SABA 
S7AZ3 
S8DS 
S8FB 
5815 
SB85 
QOOA 
SASS 
SAIS 
SC8B 
0002 
5839 
SPE4 
S9E7 
5976 
3C48 
SDAE 
sccl 
SC97 
SPAZ 
5986 
SBC1 
003C 
SACF 
S84F 
0009 
SC36 
scoc 
scp2 
SC93 
SBD2 
5861 


LOALIZ 
MOVE 
NLDR 
OMSK 
OUT3 
OUTHEX 
OUTSP 
PASCI 
Po? 
PERROR 
PINS 
FOUT 
RDHL2 
ROHL DE 
REPL2 
RHEAL 
SEAR4 
SIGNON 
TAB 
TOMF 
TLD. 
TLOAD 
TOUT 
VERM 
WARM 
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There are seven tape commands that can be given. The appropriate 
command letter must immediately follow the letter T. The first thing that 
should be done is to make a test tape. In fact, the test pattern should be 
recorded onto the beginning of each tape you own. Give the command 


>TM 


(tape make), and start recording. The computer will send a sequence of 
bytes, each being one larger than the previous one. When the maximum 
value of FF hex has been sent, the next byte will be a zero. Record the pat- 
tern for 15 to 30 seconds. Type a control-X to end the procedure. 

The integrity of the whole tape-recording system can now be tested. 
Rewind the test section of the tape and play it back. Type a command of 


>TT 


(tape test). The computer will read a byte from the tape, increment the 
value, then read another byte. If the two values don’t agree, then a letter C 
will be printed on the console. The process will then be repeated until you 
terminate it. 

If the two values do agree, then the computer will increment the first 
byte again, read another byte, and compare the two. This process will be 
repeated over and over. Each byte on the tape will be compared to see that 
it is exactly one larger than the previous byte. If you can go through a one- 
hour cassette recording without a single error, then you have a reliable 
system. 

You may have an adjustment on the A/D converter circuit that allows 
you to set the frequency of the phase-locked loop (PPL). The MITS audio 
cassette boards have this feature. Make a test tape at least 10 minutes long, 
then play it back. Adjust the PPL frequency until a stream of Cs appear on 
the console; then adjust the PPL frequency in the opposite direction. The Cs 
should not print. Continue adjusting the PPL in the opposite direction again 
until the Cs appear again. You have now bracketed the usable range of the 
PPL. Set the PPL adjustment halfway between these two extremes. 

There are some other tests you can make while the test tape is playing. 
Try moving both the audio cables and the AC line cords around to see if 
certain positions will cause an error. You can also try tapping the tape 
recorder, the computer case, the boards in the computer, and so on to see 
how delicate the system is. Pretty soon you will know if you have a reliable 
tape storage system. Remember to run the test tape at least once a week. 

To save data from the computer’s memory, including the tape program 
itself, type 


>TD<start> <stor> <autostart> <filename> 


After the D (for dump), give the start address, the stop address, the required 
autostart address, and an optional filename. A filename is important on 
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magnetic tape to ensure that you are loading the right program. The auto- 
start address can be the system monitor address. CP/M programs can be 
saved on tape using the original filename. Load the program into memory 
with DDT, SID, or the program FETCH given in the next chapter. Branch to 
the tape program and give the command 


>TD100 9AF 100 TAPE-ASM 


The filename can include the decimal point and the file type. 
Each time a new tape is made, it should be verified with the command 


>TVifilename> 
A tape can be loaded into memory, at its normal position by typing 
STL<filename> 


At the conclusion of the load, the autostart address is printed on the con- 
sole then control returns to the monitor. If an incorrect filename is entered, 
the load operation is aborted and the actual filename on the tape is printed 
on the console. 

During the load operation, all printable characters are displayed on the 
console. If your console is a printer rather than a video console, you will 
have to remove this feature to prevent the computer from falling behind. In 
this case, take out the following three lines from subroutine POUTW. 


CPI pF 
RC 
OUT CLATA 


It is not necessary to verify the load step because of the checksum feature. 
If the load step was completed, then the tape was correctly read into 
memory. 

The E command can be used instead of the L command for loading 
data. In this case the computer will branch to the autostart address at the 
completion of the load. A BASIC interpreter could be saved with the auto- 
start address set to the BASIC start address. BASIC will then automatically 
start up at the completion of the E load command. The O command is used 
to load a tape at an offset from its regular address. 

While this binary format is designed for magnetic tape systems, it can 
be used for paper tape as well. If a tape is punched on a Teletype machine, 
there will be a strange sound. The reason is that binary, rather than ASCII 
characters, are being punched. The printout will also be meaningless. But 
when the resulting tape is read back, the operation is quiet, since the inputted 
characters are not echoed back on the Teletype. 


CHAPTER TEN 


Linking Programs to the 
CP/M Operating System 


The system monitor we developed in Chapters 6 and 7 allows us to com- 
municate with the computer through the console. But this program only 
provides the bare minimum of operations such as memory display, block 
move, hex addition and subtraction, and so on. Computers are capable of 
performing more complicated tasks such as decimal arithmetic, keeping 
business records, formatting text, and game playing. Computer languages, 
such as FORTRAN, COBOL, and Pascal, make these tasks easier. These 
languages will operate on programs (called source programs) that are written 
by the user. 

As an example, a BASIC interpreter, which may be as large as 24K 
bytes, needs a user’s source program for direction. An assembler needs a 
source file to generate the desired machine code. And, of course, a format- 
ting program needs a work file to produce a finished file. 

Because programs to perform these common tasks are so large, an 
efficient method of loading them into memory is needed. In addition, the 
output generated by these programs needs to be stored somewhere. Magnetic 
tape can be used for this purpose, but it tends to be slow. The floppy disk 
currently is a better medium. It is relatively inexpensive, and the recording 
medium, the diskette, can be removed. This means that backup copies can 
be easily generated. In addition, programs can be readily exchanged between 
users. 

We wrote our system monitor to transfer data between the console and 
the computer proper. Likewise, we need a disk-operating system (DOS) to 
effect an orderly transfer of information between the disk and the computer. 
Several different floppy disk systems are available for the 8080 and the Z-80. 
The disk-operating system that is provided with the disk drives may be 
relatively primitive, or it may be very elaborate. 

A very popular DOS available today for the 8080 and Z-80 is called 
CP/M. CP/M was initially developed for the 8080 S-100 buss and the 8-inch 


N 
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soft-sectored floppy disk. It is now available for most of the other configu- 
rations, including the 5-inch floppies and the Winchester hard disk. Versions 
are supplied for computers that don’t have an S-100 buss, such as the 
TRS-80. 

CP/M is a software system that must be interfaced to each different 
computer configuration through a set of software interface routines. Once 
the interfacing is accomplished, the computer programs that run with CP/M 
become system independent. 

The operating system integrates all of the common tasks. Before CP/M 
came along, each assembler and BASIC interpreter had to incorporate its 
own text editor. The user could then write and correct the source program 
with the built-in editor. But with the CP/M operating system, the editing can 
be performed separately from program execution. An independent system 
editor is used to create an ASCII source file. Then a processor program such 
as BASIC, FORTRAN, Pascal, an assembler, or a text-output formatter can 
be directed to utilize the source file. The results can be stored in a separate 
ASCII file on the disk. 

It is possible to generate an assembly-language program with the system 
editor, then assemble it as we did when we developed the system monitor in 
Chapters 6 and 7. In this case we had to tailor the console input and output 
routines to the host computer. In particular, we included in the program the 
address of the console status and data ports, and the read-ready and write- 
ready status bits. The sense of the status flags was selected with a JZ com- 
mand corresponding to an active-high flag. As a result of this approach, our 
system monitor is not portable. The monitor runs on your system, but it 
might not run on someone else’s unless the I/O details are changed. 

We approached a solution to this problem in Chapter 8, where we wrote 
some base-conversion routines. We did not have to write the I/O subroutines 
into each program because we utilized the ones in the monitor. 

When we wrote the monitor, we placed five jump vectors at the begin- 
ning. These provided an easy access to the commonly used routines. While 
this technique greatly simplifies things, it has the disadvantage that three 
bytes must be set aside for each different entry point. Also, the programmer 
must keep track of which entry is used for which task. 

A better approach is to have only a single entry address for all opera- 
tions. When this special address is called by an external program, the values 
in the CPU registers indicate the desired operation and provide the data. The 
CP/M operating system utilizes this approach. All of the systems operations 
are performed by calling memory address 5. Up to 37 different operations 
can be performed in this way. Operations 1 through 11 allow interaction 
with the four logical peripherals named CONSOLE, LIST, PUNCH, and 
READER. They are summarized in Table 10.1. Operation 12 allows a 
program to determine the current CP/M version. The remaining function 
numbers are used for disk operations such as reading, writing, and head 
positioning. 

The desired operation is selected by placing the proper function 
number into register C. Sixteen-bit data are transferred in the DE register. 
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Eight-bit data are transferred in Register E or the accumulator. For example, 
the console input status can be determined by placing the function number 
of 11 (decimal) in the C register, and calling address 5. 


MVI Cril 
CALL 5 


Table 10.1. CP/M I/O operations. The function number is placed into register C. Single 
bytes are in register E. Double bytes are in the D, E register pair. 


Function 
number Value 
(in C) Operation Value sent returned 
1 read CONSOLE char in A 
2 write CONSOLE char in E 
3 read READER char in A 
4 write PUNCH char in E 
5 write LIST char in E 
6 direct console I/O FF (input; char/stat in A 
char (output) 
7 get I/O byte IOBYTE in A 
8 set I/O byte IOBYTE in E 
9 print CONSOLE buffer buffer address in D, E 
10 read CONSOLE buffer buffer address in D, E characters in 
buffer: 
11 CONSOLE status 0 = not ready 
FF = ready 


On return, the accumulator and register E contain the value of FF hex if the 
console is ready for input, or a zero if not. The byte in the console data 
register can then be read by calling address 5 with the value of 1 in register 
C. The byte that is read will be returned in the accumulator. 


CP/M MEMORY ORGANIZATION 


When CP/M is in operation, the main memory is divided into several regions. 
In order of decreasing memory, they are: 


. Basic Input/Output System (BIOS) 

. Basic Disk-Operating System (BDOS) 
. Console-Command Processor (CCP) 

. Transient-Program Area (TPA) 

. System parameter area 


orRWNFH 


If the BIOS is especially tailored to a particular system, then it is called the 
customized BIOS or CBIOS. The BIOS and BDOS regions are collectively 
known as the Full Disk-Operating System (FDOS). The memory layout is 
shown in Figure 10.1. 
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Figure 10.1 A memory map for CP/M. 


BIOS contains the tailor-made routines for operation of all the periph- 
eral devices such as the console, printer, disk drives, phone modem, and tape 
drives. BDOS has the hardware-independent routines for the disk operating 
system. The CCP handles the console commands. It contains the built-in 
routines such as DIR, LIST, and ERA. Separate programs such as PIP, DDT, 
and user-written programs execute in the TPA. 

The lowest memory area contains several different items. The first is a 
warm-boot entry to BIOS. The first few entries are: 


Address Action Purpose 

0 JMP BIOS+3 warm start entry 

3 IOBYTE peripheral assignment 

4 disk current drive number 

5 JMP BDOS+6 peripheral control 

5C hex FCB command-line argument 


CHANGING THE PERIPHERAL ASSIGNMENT 
CP/M can interact with four logical peripheral devices. These are termed: 


CON: console 

LST: _ list (printer) 
PUN: punch 

RDR: (tape) reader 


Each of these four logical devices can be assigned to four different physical 
devices. The 16 different possible combinations can all be encoded into the 
IOBYTE located at memory address 3. The colon is part of the name; it is 
used when referring to peripheral devices. Disk filenames, on the other hand, 
are written without the colon. 

The actual mapping of the logical devices into the desired physical 
devices must be accomplished in BIOS. Since there are so many different 
possibilities, it is not likely that the system supplied by your dealer will have 
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the IOBYTE features fully implemented. The CP/M logical console is prob- 
ably mapped into your video terminal and the logical list device will be 
mapped into your printer. But the punch and reader might be mapped into 
your video terminal. 

Even if you have only two peripherals, it may be useful to set up the 
IOBYTE feature. Foxexample, suppose that you have both a video terminal 
and a printer such as a Decwriter or Teletype that has its own keyboard. 
Then either peripheral can be used for the console input and either can be 
used for the console output. The four physical console arrangements could 
correspond to: 


IOBYTE Input Output 
0 video video (default) 
1 video printer 
2 printer _ printer 
3 printer video 


Your customized BIOS (CBIOS) will set the default combination on a 
cold start. But any user program can change the IOBYTE to a new configu- 
ration. Also, the CP/M programs STAT and DDT can be used to alter the 
IOBYTE. The instructions in CBIOS will sample the IOBYTE and act 
accordingly. 

Suppose that the IOBYTE is set to zero, and you load a BASIC inter- 
preter. You develop a program that sends information to the console. The 
program will include statements like 


° ° 


PRINT Ix X(I)» YCI) 


oo 6 © 


The resulting output appears on the console video screen. After the program 
is debugged, you would like a hard-copy output of the program results. This 
is easily done if you have incorporated the IOBYTE feature. You can change 
the IOBYTE with the POKE command in the BASIC interpreter. 


FOKE 3» 1 
RUN 


The POKE command will change the IOBYTE at address 3 from a zero to 
a 1. Console output will now appear at the printer when the BASIC program 
is run. Of course, console input has not changed; it still comes from the 
video terminal. At the conclusion of the run, the IOBYTE can be restored 
with another POKE command. 


POKE 3» 0 


As another example, suppose that you have a Teletype for your list 
device and it has a paper tape reader and punch. You can easily make BASIC 
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tapes and reload them using the IOBYTE features. POKE the IOBYTE toa 
value of 1 for punching a source tape. This will map the Teletype output 
into the logical console output. Give the BASIC commands 


NULL 3 
LIST 


to make a tape of the source program. 
Later, you can reload the tape into BASIC by setting the IOBYTE toa 
value of 3. 


POKE 3% 3 


Just put the tape into the reader and turn it on. With this configuration, the 
Teletype keyboard and tape reader perform the console input. But the video 
screen is used for console output. After the tape has been read, give the 
command 


FOKE 3, 0 


from the Teletype keyboard to return to the console keyboard. 


INCORPORATING THE IOBYTE INTO YOUR CBIOS 


You will have to reassemble your CBIOS if you want to incorporate the 
IOBYTE feature. A sample CBIOS that uses the IOBYTE is given in Listing 
5.1. This version additionally features such things as an interrupt-driven key- 
board and connection to a telephone modem. 

At the beginning of BIOS there are seven jump vectors that are used by 
other parts of CP/M. 


JMF INIT sinitialization 
JMP CONST sconsole status 
JMP CONIN sconsole inrut 
JMP CONOUT console outrut 
JMP LOUT slist outrut 
JMP PUNCH yPuNCh 

SMF READIIR sreader 


Because of these fixed entry points, BIOS can be altered without having to 
alter any other part of CP/M. There are four regions of BIOS that need to 
be changed if the IOBYTE feature is incorporated into console routines. 
These are the routines for initialization, console status, console input, and 
console output. We have to set the IOBYTE to the default value in the 
initialization section of BIOS. Then, at the beginning of the three console 
routines, we have to read the IOBYTE at address 3, and branch to the 
appropriate subroutine. 
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In accordance with the step-by-step approach to programming we used 
in Chapter 6, we will not make all the changes at one time. The first altera- 
tion will be to the initialization and output routines. 


Incorporating the IOBYTE into Output Routines 


First locate the initialization region of BIOS. This area is referenced by the 
first jump instruction at the beginning of BIOS. Add the following instruc- 
tions somewhere in the initialization routine. 


MVI Ax0 ‘tet 3 zero 
STA 3 *SET IOBYTE 


The safest places to put them are at the very beginning of the initialization 
section or at the end, just before the RET instruction. We could, of course, 
use an XRA A instruction rather than the MVI A,0 instruction shown above. 
This would reduce the size of BIOS by one byte. But if we later wanted 
BIOS to initialize the IOBYTE to 3 we would have to reassemble BIOS. 
With the MVI instruction, we can easily change the argument of zero toa 3 
by using the system debugger. 

Refer to the label START at the beginning of Listing 4.1 where there is 
a series of jump instructions. 


START: 
JMP INIT sINITIALIZATION 
JMP CONST sCONSOLE STATUS 
JMP CONIN sCONSOLE INPUT 
JMP CONOUT *sCONSOLE OUTPUT 


Locate the address of the console-output routine. This can be found from 
the fourth jump instruction, JMP CONOUT in this case. We will now alter 
the console-output routine so that it will read the IOBYTE at memory 
address 3 and act accordingly. The upper six bits, which refer to the list, 
punch, and reader, are reset by performing a masking AND with the value 
of 3. 


XXXX XXO1 or XXXX XX10 IOBYTE 
11 11 AND with 3 


0000 0001 or 0000 0010 IOBYTE 


The two low-order bits then determine whether output is sent to the console 
or to the printer. If the resulting value is a 1 or a 2, then a branch is made to 
the printer-output routine. Otherwise, output goes to the video console. 
Printer output corresponds to the following IOBYTE bit patterns. 
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0000 0001 or 0000 0010 IOBYTE 
11 11 AND with 3 


0000 0001 = 1 0000 0010 = 2 

The other two possible IOBYTE patterns correspond to console output. 
0000 0000 = 0 or 0000 0011 = 3 

Notice that parity is odd for printer output but parity is even for console 


output. Thus the BIOS code at this point is programmed to jump to the 
list-output routine if parity is odd. 


LOGICAL CONSOLE OUTPUT 


ONOUT: LDA IOBYTE s¢GET ASSIGNMENT 
ANI 3 *>MASK FOR CONSOLE 
JFO LOUT sLIST OUTPUT 

9 

» VIDEO-OUTPUT ROUTINE 

, 

VIDEO?. « » (existind routine) 


o @¢ © 


LIST-OUTPUT ROUTINE 


fo ~ « 


OUT: » « « (existing routine) 


oe 


Assemble the new BIOS and try it out. We can use the system debugger 
DDT or SID to load the new CBIOS over the old one. The command is 


A>DDT CBIOS.HEX 


One word of caution: Since the debugger uses the routines in CBIOS, there 
may be a problem. A safer way to put the new CBIOS into place is to first 
load it somewhere else. 

Use the hex arithmetic command of DDT to calculate the offset. Sup- 
pose that BIOS ‘is assembled for the address DBOO hex and you want to load 
it temporarily at 100 hex. Then the command 


H1i00 DBOO 


will give both the sum and difference of the two addresses. The difference is 
what we need. Load CBIOS with the indicated offset 


ICBIOS.HEX 
Rioffset) 
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DDT will indicate the location of the end of BIOS. The move command can 
now be used to put BIOS into its proper place. 


M100 2FF [BOO 


The second address will be the present end of BIOS. The new BIOS is now 
in place. If the debugger no longer works, there may be an error in BIOS or 
there may have been an error in the move command. 

If everything appears to be all right, try out the IOBYTE feature. Use 
the S (set) command of the debugger to change the IOBYTE at address 3. 
Change the value of the IOBYTE from a zero toal. 


$3 
0003 00 1 (tyre a 1) 
0004 OO . (tyre a decimal Point) 


The (logical) console output should now appear at the printer instead of the 
console. Notice that this is different from typing a control-P when the 
IOBYTE has a value of zero. In fact, if a control-P is typed at this time, each 
typed character should be printed twice. Return the logical console output 
to the console by changing the IOBYTE back to zero using DDT. 


$3 
0003 O1 O (tyPe a 0) 
0004 00 . (tyre a decimal Point) 


Output should return to the console. 

If everything appears to be all right, you are still not finished. You have 
a working copy of BIOS in memory; now you must get a copy onto the sys- 
tem tracks of the disk. Continue with this section if you want to write a 
permanent copy of the new BIOS onto the disk. Otherwise, go on to the 
second part of the alteration where you will add the IOBYTE feature to the 
console input routines. Then come back to this section to save the com- 
pleted BIOS. If you have a Lifeboat version of CP/M, you can easily copy 
the new version of BIOS to the disk. Just give the command 


A>SAVEUSER 


and the new BIOS will be copied to the system disk. 

Another method of getting the new CBIOS on the disk system tracks 
is to use SYSGEN. The current version of CPM is loaded into memory with 
the DDT command 


A>DOT CPMXX.COM 
where XX refers to the memory size. Then move the working version of 


BIOS down to the proper SYSGEN position using the DDT move command. 
Alternately, the HEX file of CBIOS could be copied from disk into memory. 
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The SYSGEN location for BIOS should be given in your CP/M documenta- 
tion. Perform a warm start with a control-C, and then give the command 


A>SYSGEN 


Answer the first question about where to get the system by typing just a 
carriage return. The second question asks where to put the system. Give the 
appropriate drive name, A, B, etc. The new BIOS will now be copied to disk. 


Incorporating the IOBYTE into Input Routines. 


We are now ready to implement the second part of the console IOBYTE 
feature. This will allow the logical console input to be obtained from either 
of two keyboards. One of these keyboards will be the video terminal; the 
other will be the printer. If you don’t have a second keyboard, go on to the 
next section. 

Locate the console status and the console input routines. These are 
found from the second and third entries of the jump table of BIOS. Your 
present console-input routine may be coded in one of two ways. One 
method is straight-forward. The input routine has a status check independent 
of the regular BIOS status routine. 


CONSOLE INPUT ROUTINE 


5 
, 
, 
Cc 


ONIN: IN CSTAT sGET STATUS 
ANI CIMSK sMASK FOR INPUT 
JZ CONIN sLOOP UNTIL READY 


o ¢ @ 


The other method uses the BIOS status routine. 


; 
¢ CONSOLE INPUT ROUTINE 
, 
CONIN? CALL CONST §GET STATUS 
JZ CONIN yLOOP UNTIL READY 


o 6 @ 


Although either method can be altered to include the IOBYTE feature, 
the former method will be demonstrated here. We will need two separate 
input routines. One is for the video screen and the other is for the printer or 
other keyboard. Our new console input routine might look like this. 


, 

¢ LOGICAL CONSOLE INPUT 

, 

CONIN: LDA IOBYTE *#GET ASSIGNMENT 
ANI 2 +MASK FOR LIST 
JNZ LISTIN $LIST INPUT 
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VIDEO INPUT 


IDIN: IN CSTAT sGET STATUS 
ANI CIMSK sMASK FOR INPUT 
JZ VIDIN sLOOP UNTIL READY 
IN CDATA sGET DATA 
ANI 7FH sMASK PARITY 
RET 


INPUT FROM PRINTER 


ISTIN? IN LSTAT sGET STATUS 
ANI LIMSK sMASK FOR INPUT 
JZ LISTIN #LOOPF UNTIL READY 
IN CDATA sGET DATA 
ANI 7FH sMASK PARITY 
RET 


The third jump statement at the beginning of BIOS should branch to 
the label CONIN. The IOBYTE at memory address 3 is read. All bits but 
bit 1 (the second bit) are zeroed with the ANI 2 command. List input corre- 
sponds to an IOBYTE of 2 or 3. The logical AND with 2 and either value 
will produce the result of 2. 


0000 0010 or 0000 0011 IOBYTE 
10 10 AND with 2 


0000 0010 0000 0010 = 2 
The JNZ instruction will then cause a branch to the list-input routine. 


Otherwise, program flow will continue on to the console-input routine. 
A similar construction can be used for the console status routine. 


LOGICAL CONSOLE-INPUT STATUS 


ONST? LDA IOBYTE #GET ASSIGNMENT 
ANI 2 sMASK FOR LIST 
JNZ LISTST  ¢LIST 


INPUT FROM VIDEO 


STAT? IN CSTAT sCHECK STATUS 
ANI CIMSK sMASK FOR INPUT 
RZ sNO READY 
MVI AvsOFFH SET FOR READY 
RET 


INPUT FROM LIST 


ISTST: IN LSTAT §CHECK STATUS 
ANI LIMSK S5MASK FOR INPUT 
RZ sNOT READY 
MVI AvsOFFH sSET FOR READY 
RET 
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Assemble the new version of BIOS and try it out as we did in the previous 
section. Load the debugger, then use it to change the IOBYTE at address 3. 
First, change the IOBYTE to a value of 3. This will assign the logical console 
input to the printer (or other alternate keyboard) and logical console output 
to the video screen. As soon as you make the change, all further input must 
come from the printer. Use the debugger to change the IOBYTE to a value 
of 2. Now logical console input must come from the printer, and logical 
console output will appear at the printer. Finally, change the IOBYTE back 
to the value of zero. Console input and output should both go through the 
video terminal. 


USING STAT TO CHANGE THE IOBYTE 


The CP/M program called STAT can be used to symbolically change the 
IOBYTE. STAT can also be used to determine the current value of the 
IOBYTE. Each of the four logical devices CON: (console), RDR: (reader), 
PUN: (punch), and LST: (list) can be assigned to four different physical 
devices. 


Logical device Physical device 

1 2 3 4 
CON: console TTY: CRT: BAT:  UC1: 
RDR: reader TTY: PTP: UR1: UR2: 
PUN: punch TTY: PTP: UP1:  UP2: 
LST: | list TTY: CRT: LPT: ~ ULI: 


The first column represents the four logical peripherals. The remaining 
entries on each line represent the four physical devices. You can easily change 
these names in STAT to something more descriptive. Load STAT into mem- 
ory with the debugger. 


DDT STAT.COM 


Then dump the first few lines. 


Di00O 16F 


You will see the names of the logical peripherals and the physical peripherals 
encoded in ASCII. You can now change any of the names to something else. 
You might want to choose the names 


CRT: 
LST: 
LPT: 
LCR: 
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for the four console devices. These four names correspond to the IOBYTE 
values of 0 through 3. After you change the names with the debugger, return 
to CP/M and save the altered STAT. If the IOBYTE is currently set to zero 
and you type the command 


A>STAT CONS=LST? 


STAT will change the IOBYTE to a value of 1 and console output will appear 
at the printer. The IOBYTE can be set back to zero with the command 


A>STAT CON?=CRT? 


If you have other peripherals, such as a phone modem, these can also 
be incorporated into IOBYTE. The logical punch can then be sent to the 
modem, the printer, or the console. A disk file can be sent over the phone 
modem with the command 


A>STAT PUN?=B3CPMIO.ASM 


where CPMIO.ASM is a disk file on drive B. As you can see, there is room for 
a lot of imagination. 


A ROUTINE TO GO ANYWHERE IN MEMORY 


The assembly language program shown in Listing 10.1 can be used to branch 
to any location in memory. Executable programs in CP/M are usually designed 
to be run starting at address 100 hex, since this is where programs are loaded 
by CP/M. There are times, however, when it is desirable to assemble a pro- 
gram for operation at some other location. The system monitor developed in 
Chapter 6 is one such program. If this monitor is to be located in ROM, 
then it must be placed above the CP/M operating system. A location of F000 
hex would be ideal. But there is no easy way to get to the monitor from the 
CP/M system. If the GO routine is located on disk drive A, then we have 
only to give the CP/M command 


A>GO FOO0OO 


and a branch will occur to the address F000 hex. 

The GO program demonstrates several of the I/O features available with 
CP/M. The branch address given as an argument on the above command line 
is read from a region of memory called the file-control block (FCB). The 
address of the FCB is 5C hex but the ASCII-encoded address starts at 5D 
hex. The input address, F000 in this example, is a valid hexadecimal number; 
it is to be converted from ASCII into a 16-bit binary number. The result is 
placed into the CPU program counter so that the computer will branch to 
the desired address. The address format is free-form, and leading zeros are 
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Listing 10.1 A Frosgram to go anywhere in memory. 


So 
So 
So 
D> 
Hu WU H 


229801 
cn1001 
O10F E9 


210000 
CiSé301 
FE20 


ry 
y 
a 
’ 


TITLE 
, 
§ USAGE: 
; 
ORG 100H 
, 
BDOS EQu 
FCB EQu 
F BUF EQU 
RDOBUF EQu 
CR EQU 
LF EQu 
, 
START? 
LXI 
MoV 
CPI 
JZ 
AGAIN: SHLD 
CALL 
PCHL 


<> a> <> ~e> 


READHL 3 
RDHL23 


LXI 
CALL 


> a 


¢ CONVERT ASCIT 


NIB? 


(date does here) 


‘GO (Jjumre anywhere) ’ 


3 
SCH 
9 
10 
ODH 
OAH 


Hy FCBt1 
AsM 


ERROR 
RBUFP 
READHL 


TYPE GO F800 TO JUMP TO F800 HEX 


sDOS ENTRY FOINT 
sFILE CONTROL BLGCK 
sPRINT BUFFER 

sREAD CONSOLE BUFFER 
sCARRIAGE RETURN 
sLINE FEED 


*GET ARGUMENT IF ANY 
sFIRST BYTE 

> BLANK? 

9NO ARGUMENT 

sSAVE POINTER 

*GET ADDRESS 

*GO TO ADDRESS 


CONVERT ASCII-HEX CHARACTERS 
TO 16-BIT BINARY NUMBER IN HoL 


H»0 §START WITH O 
GETCH sGET A BYTE 
ies sEND? 
sYES 
NIB ¢TO BINARY 
RDHL4 *NOT HEX 
H sTIMES 2 
H sTIMES 4 
H sTIMES 8 
H sTIMES 16 
L *COMBINE NEW 
Ly+A sFUT BACK 
RDHL2 sNEXT 
TO BINARY 
‘0’ sASCII BIAS 
7 < 0 
“F°-40° 41 
9 > F 
10 
9A NUMBER 0-9 
“AL-/9'-1 
10 
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0138 
O13A 


O13B 
O13E 
0141 
0144 
0147 
0149 
014C 
014D 
0150 
0151 
0153 
0156 


0159 
O15B 


O1SE 
0140 


0163 
0164 
0167 
0168 
01469 
016C 
O16E 
0171 
0173 
0174 


0175 
0185 
0197 


O19B 
0190 
019E 
O19F 


O1A0 


FEFO 
C8 


117501 
Cp5901 
119D01 
COSEO1 
1600 
SAPEOL 
SF 
219F01 
19 
3620 
219F01 
C30901 


OEO9 
C30500 


OEOA 
C30500 


474F 206572 
7468652061 
ODOA2ZA24 


9FO1 
OA 


DD > o> > 


DHL43 


{T] ~e> ~«> «> 


RROR? 


FRINT 


“Th > o> «> 


RINT? 


INFUT 


ZO a> > 


EADB?: 


GET A 


G) «> «> «> 


ETCH: 


GETC23 


MESG: 


, 
RBUFP? 
RBUFM: 
RBUFL 
RBUF 3 


’ 


CPI 
RZ 


LXI 
CALL 
LXI 
CALL 
MVI 
LDA 
MOV 
LXI 
DAD 
MVI 
LXI 
JMF 


BLANK AT END OF LINE IS OK 
ELSE AN ERROR 


4 4— QO?’ 


IMPROFER ARGUMENT, TRY AGAIN 


D»yMESG #POINT TO MESSAGE 
PRINT s>SEND IT 
TiyRBUFM #INPUT BUFFER 
READB sGET A LINE 
D0 

RBUFL s>BUFFER LENGTH 
EvA 

H»RBUF 

nD sPAST BUFFER 
My’ ¢ *FUT IN BLANK 
H» RBUF 

AGAIN sTRY AGAIN 


CHARACTERS UNTIL $ IS FOUND 


NVI 
JMP 


CryPBUF #SET FOR FRINT 
BbOsS 


A LINE FROM CONSOLE 


MVI 
JMP 


CyRDBUF #READ INPUT BUFFER 
BDOS 


CHARACTER FROM THE INPUT BUFFER 


PUSH 
LHLD 


H 

RBUFP sGET POINTER 

ArM sGET NEXT CHAR 

H sINCREMENT FOINTER 


RBUFF sSAVE POINTER 
‘Z°+7 sUPPER CASE? 
GETC2 9NO 

SFH sMAKE UPPER CASE 
H 


‘GO error. Inrut ’ 
‘the address asain.’ 
CRyLF ‘x?’ 


RBUF +BUFFER POINTER 
10 sMAX SIZE 

1 sACTUAL SIZE 

1 sINPUT BUFFER 
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unnecessary. If more than four characters are entered, only the last four are 
used. Thus, all of the following are valid. 


0 F000 
900 PF800 
6000 


If no argument is given to the GO command, or if an invalid hexadeci- 
mal address is entered, then an error message is printed. This step uses the 
console string-output feature, selected with the function code of 9 in register 
C. The DE register pair is loaded with a pointer to the string location in 
memory. A dollar sign ($) is used to indicate the end of the string. In sub- 
routine SENDM of Chapter 6, a binary zero is used for this purpose since it 
requires less code. 

The user can retype the desired address after the error message has been 
printed. This time, however, the program reads the input string data in a 
different way. The console string-input operation is selected by loading the 
C register with the function number of 10. If the new string is a valid hex 
number, it is converted to a 16-bit binary number. The computer then jumps 
to this address. If the input is still invalid, the error routine is repeated again. 

During the input operation, the usual CP/M commands are available for 
error correction. For example, the most recently typed character can be 
deleted by pressing the DEL key. A control-R will reprint the current line in 
its corrected form. A control-U cancels the entire line so that it can be 
retyped. If Version 2 of CP/M is being used, then the backspace character, 
control-H, can also be used for correcting errors. Finally, a control-C can be 
entered to abort the entire program. This returns control to the CP/M 
operating system. 

Enter the GO program in Listing 10.1. Assemble it and try it out. GO 
is a universal program; it will work on any system. If you have a monitor 
located in memory, use GO to branch to it; if not, you can still try out the 
GO program. Type just the command of GO without an argument. An error 
message should be printed. Type some characters, then delete some of them 
with the DEL key. The deleted characters will be printed a second time. 
Reprint the line with a control-R to see the correct version. Finally return 
to CP/M by giving the address of zero. 


GO 0 


A control-C can also be used to return to CP/M. 


A LIST ROUTINE WITH DATE AND TIME 


In Chapter 7 we developed a monitor routine for sending data to a separate 
list device. When this routine is activated with a control-P command, the 
output appears at both the console and the printer. CP/M has a similar 
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arrangement. A control-P command will activate the list device, too. Output 
is then sent to both the console and the printer. 

But the console and list routines are entirely separate in CP/M. Output 
can therefore be sent specifically to the list device and it will not appear on 
the console. In CP/M I/O operations, a function number of 2 corresponds to 
console output, and a function number of 5 corresponds to list output. If 
memory address 5 is called with a value of 2 in the C register, then the byte 
in the E register will be displayed on the system console. On the other hand, 
if a function number of 5 is placed in the C register, then the byte in register 
E will appear on the list device. The byte in the E register can be sent to the 
punch by loading a function number of 4 into the C register. 

This complexity may seem unnecessary, since the list device can be 
turned on by typing a control-P. If the command 


A>TYPE «<filename> 


were given, then the file would be sent to both the console and the printer. 
The disadvantage of this method is that the TYPE command line will appear 
on the printer output. Also, when the listing is finished, the new prompt of 
A> will be printed on the listing. 

The CP/M utility program PIP can be used to send a disk file specifically 
to the list device. The command is 


ASPIP LSTi=<filename>CT8] 


The argument T8, embedded in brackets, will expand the ASCII tab char- 
acter to 8-column fields. PIP, however, does not automatically eject a new 
page when a form feed is encountered. 

The LIST program in Listing 10.2 can be used to send an ASCII disk 
file to the printer, too. It will automatically expand the ASCII tab character. 
Furthermore, when a form-feed character is encountered, LIST will add the 
correct number of lines to the end of the page. At the end of the disk file, 
additional line feeds are issued to finish the page. This will ensure that the 
printer will start the next task on a new page. If the file contains an odd 
number of pages, then an extra blank page is added to the end. Without this 
feature you will have to refold about half of the output. 

If your computer keeps track of the date and time, LIST can print 
current values at the top of the first page. The name of the disk file is also 
printed on this line. 

LIST is a very small program, requiring only 1K bytes of memory. It 
was derived from the program called DUMP in the CP/M Interface Guide. 
LIST bears only a passing resemblance to DUMP, however. DUMP is designed 
to convert binary files to ASCII-hex characters and display them on the 
console. LIST, on the other hand, prints ASCII files directly with no conver- 
sion. Since the CP/M BDOS is used for all I/O and disk operations, LIST will 
operate with all standard CP/M systems. 


Listing 10.2, 


0100 
0005 
0001 
0005 
0009 
OOOR 
OOOF 
0014 
ooon 
OO0A 
OO1A 
0009 
000C 
003A 
0042 


0O0sc 
0080 


oosn 
0068 
007C 


00C4 
o0ocs 
00C7 
00C4 


0100 
0103 
0104 
0107 
010A 
010D 
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Hob int to i dt ton i bok on 


of 


fou ou 


210000 
39 

22E004 
310005 
111E04 
CUSEO2 


List an ASCII disk file. 


USAGE? 


“E> “E> “E> “Er er “Er “ar “er “ed “Er a> “E> er a> er 


LIST 
LIST 
LIST 
LIST 


goes 


SEND ASCII DISK FILE TO LIST 

PUT DATE AND TIME AT TOP OF PAGE 
ENTIRE FILE LOADS INTO MEMORY FIRST 

FORMFEEDS ADDED WITH F ARGUMENT 
EXTRA PAGE ADDED TO MAKE TOTAL EVEN 
UNLESS A F OPTION IS GIVEN 


<filename> 

<filename> F (add form feeds) 
kfilename> P (no extra rade) 
<filename> m (skir m lines) 


here) 


‘List an ASCII disk file.’ 


100H 
EQU 
EQU 
EQU 
EQU 
EQu 
Eau 
EQU 
EQU 
EQu 
EQU 
EQU 
EQU 
EQU 
EQU 


EQU 
EQU 


te) *DOS ENTRY FOINT 

1 sREAD CONSOLE 

5 sLIST OUTPUT 

9 sPRINT CONSOLE BUFFER 
11 sKILL? (TRUE IF CHAR) 
15 sFILE OPEN 

20 sREAD FUNCTION 

ODH sCARRIAGE RETURN 

OAH sLINE FEED 

1AH yEND OF FILE 

9 aan § 

OCH sFORM FEED 

58 sLINES/PAGE 

66 sMAX LINES 

SCH sFILE CONTROL BLOCK 
80H sDISK BUFFER ADDR 


’ 
y FILE-CONTROL BLOCK DEFINITIONS 


FCBFN 
FCBRL 
FCBCR 


Eau 
EQU 
EQU 


FCBt1 sFILE NAME 
FCBt12 sCURRENT REEL # 
FCB+32 #NEXT REC #(0-127) 


, 
* TIME AND DATE FROM A COMPU/TIME BOARD 


, 
ADATA 
ACONT 
BCONT 
BDATA 


y 
7 
, 
A 
; 
S 


TART? 


EQU 
EQU 
EQU 
EQU 


LxI 
DAL 
SHLD 
LXI 
LXI 
CALL 


OC4H *FORT A DATA 
ADATAt1 #PORT A CONTROL 
ADATAt3 sPORT B CONTROL 
ADATAt2 sPORT B DATA 


SAVE OLD STACK AND SET UP A NEW ONE 


HO 

SP 

OLDSP sSAVE STACK 
SP»STACK 

DyRULES 

FRINT *HOW TO ABORT 
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0110 
0113 
0116 
0117 
0119 
011C 
O11E 
0121 
0123 
0126 


0128 
0129 
012A 
012B 
012C 
012D 
O12E 
012F 
0131 
0132 
0133 


0136 
0139 


013C 
O13F 
0140 


0143 
0146 
0148 
014B 


O14E 
0151 
0152 
0153 
0156 
0157 
015A 
0158 
01isD 
0160 
0161 


0164 
01465 
0148 
016B 


FE20 
CA4001 
FE4S 
CA3CO1 
FESO 
CA3601 
1630 


03 
C31601 


320904 
C33F01 


320804 


CDB302 
3E80 

32DE04 
32D304 


2ADA04 
7C 

BS 
CA6401 
ES 
CD4302 
E1 
FEOD 
C25601 
2B 
C35101 


AF 
320504 
CD4302 
ES 


“> er o> 


SKIP23 


“<> “> “e> 
oO 
o 
z 
< 
m 
a 
+ 
D> 
wo 
oO 
a! 
al 


e 


’ 
NOPAGE: 


; 
FORM: 
ZERO: 
SKIF33 


READ 


, 


MAING: 


MAINZ?’ 


a 


, 
MAINS? 


MAIN23 


XRA 
SHLI 


H»0 

By 6DH 
B 
SKIP3 
‘FS 
FORM 
“Rs 
NOPAGE 
“Q¢ 


DECIMAL 


DsH 
Esk 
H 

H 

sf] 

H 
EvA 
D0 
DB 

B 
SKIF2 


PFLAG 
ZERO 


FFLAG 
A 
SKIPB 


HOW MANY LINES TO SKIP BEFORE STARTING? 


93RD ARGUMENT 

9GET CHARACTER 
*>BLANK AT END 

> DONE 

sNEED FORM FEEDS? 
9YES 

sEXTRA PAGE? 

>NO 

sREMOVE ASCII BIAS 


TO BINARY IN Hel 


*DUPLICATE 
sHolL IN DeE 
sTIMES 2 
sTIMES 4 
sTIMES S 
sTIMES 10 


sADD NEW BYTE 
¢INCR POINTER 
9NEXT 


yNO EXTRA PAGE 
sSET FOR FORM FEEDS 


*RESET COUNT 
9SAVE BINARY CNT 


AS MUCH AS POSSIBLE INTO MEMORY 


CALL 
MVI 
STA 
STA 


SETUF 
A»80H 
IBP 

TIME2 


SKIPB 
AvH 

L 
MAINS 
H 

GNB 

H 

CR 
MAIN7 
H 
MAINS 


A 
FULL 
GNB 
H 


sSET UP INPUT FILE 


*SET POINTER TO 80H 
9SET 1ST FASS 


sHOW MANY LINES? 


sHelk = OF? 
sNO SKIP 


sNEXT BYTE 


sLOOK FOR CR 
sDECR COUNT 


yRESET FLAG 
*GET A BYTE 
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0146C 2ADCO4 LHLD BUFFF sMEMORY FOINTER 
O16F 77 MoV MrA sPUT BYTE IN 
0170 23 INX H 
0171 220004 SHLD BUFFP +SAVE POINTER 
0174 47 MOV Bra 
0175 SEFF MVI AvOFFH 
0177 BD CMP L sL=07? 
0178 C28K01 JNZ MAIN4 yNO 

» CHECK FDOS 
017B 3A0700 LDA 7 +FDOS 
O17E D60A SUI 10 sCCP -1 
0180 BC CMP H »TOO BIG? 
0181 D28R01 JNC MAIN4 7NO 
0184 SE1A MVI A» EOF 
0186 77 MOV MrA sPUT IN MEMORY 
0187 320504 STA FULL sSET FOR FULL 
O18A 47 MOV BvA 
0O18B 78 MAIN4: MOV ArB *GET BYTE 
018C E1 POP H 
018D FELLA CPI EOF 
O18F C26801 JNZ MAIN2 >NO 


CHECK FOR EOF AT END 


‘o> er <> 


0192 2ADCO4 LHLD BUFFP *GET FOINTER 
0195 2B nCcx H 

0196 SE1A MVI Av EOF 

0198 BE CMF ‘ sEOF? 

0199 CAA101 JZ MAINZ sYES 

019C 23 INX H 

O19D 77 MoV MA yFUT IN EOF 
O19E 22DC04 SHLD BUFFF 


O1A1 CD7CO2 AINS: CALL RESET sPOINTER 


FUT TIME AT START OF LISTING 
REMOVE FORMFEED IF FIRST 


ser er er er J ww 


01A4 CUSDOS CALL CLOCK sGET TIME 
O1A7 3AD804 LDA FFLAG sFORMFEEDS? 
O1AA B7 ORA a 
O1AB C4F601 CNZ TWOLN 9YES 
O1AE COSFO2 CALL GETB sGET BYTE 
O1B1 FEOC CPI FORMFD sFORMFEED 
O1B3 C2BC01 JNZ GLOF2 >NO 
0186 CDF4601 CALL TWOLN sSEND 2 LF 

’ 
O1B9 CDSFO2 GLOOF: CALL GETB ¢GET NEXT BYTE 
O1BC 47 GLOP2: MOV BrA sSAVE BYTE 
O1BD CDFDO2 CALL TABO sPRINT BYTE 
01CO 78 MOV AyB sGET BYTE AGAIN 
01C1 FEOA CPI LF sEND OF LINE? 
0103 C2B901 JNZ GLOOF y>NO 
0106 3AD604 LDA LCOUNT +¢GET COUNT 
01C9 3C INR A *INCREMENT IT 
O1CA 320604 STA LCOUNT sSAVE IT 
O1CD FE42 CPI LMAX *TOO MANY? 
O1CF D43202 CNC NPAGE sYES» RESET 
0102 3AD804 LDA FFLAG 9FORM FEEDS? 


—_—_—_—_—_—_—_———————————————————————— 
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01DS B7 ORA A 
0106 CAB901 JZ GLOOP §NO 
O1n9 3AD604 LDA LCOUNT sGET COUNT 
O1DC FE3A CPI LINES yEND OF FAGE? 
O1DE DAB901 Jc GLOOP 9NO 
O1E1 Ch1iBO2 CALL FILL yNEW PAGE 
O1E4 CDF601 CALL TWOLN 
O1E7 C3B901 JMP GLOOP 
y 
9 CHECK FOR ABORT» ANY KEY FRESSED 
y 
O1EA ES ABORT: FUSH H 9 SAVE 
O1EB 0S PUSH D 
O1EC CS PUSH B 
O1ED OEORB MVI Cy BRKF s¢CONSOLE READY? 
O1EF CDOS00 PCHAR2: CALL BDOS 
O1F2 C1 POP B sRESTORE 
O1FS [1 FOP 0 
O1F4 El FOP H 
O1FS C9 RET 
’ 
O1F6 O460A TWOLNS MVI BoLF *TWO LINES 
O1F8 3AD604 LDA LCOUNT 
O1FB 3C INR A sADD 2 TO 
O1FC 3C INR A >COUNT 
O1FD 320604 STA LCOUNT 
0200 CD0302 OUTT2: CALL OUTT sDOUBLE OUTFUT 
’ 
0203 78 OUTT: MOV AvB sOUTPUT FROM B 
’ 
> SEND) CHARACTER FROM A TO LIST 
’ 
0204 ES PCHAR: PUSH H 
0205 0S FUSH 0 
0206 CS FUSH B *SAVED 
0207 OE0S MVI CryTYPFEF ¢LIST 
0209 SF MOV EvA 
O20A FEOC CPI FORMFD) sFORMFEED? 
O20C C2EFOL JNZ FCHAR2 ¢PRINT BYTE 
, 
9 FILL OUT PAGE AFTER FORMFEED 
y 
O20F Ch1iRO2 CALL FILL 
0212 O60A MVI BoLF sFOR FORMFEED 
0214 ChO0302 CALL OUTT 
0217 Ci FOF B 
0218 D1 POP 0D 
0219 E1 POP H 
O21A C9 RET 


FILL OUT END OF PAGE 


O21B 3AD604 ILL? LDA LCOUNT *#LINE COUNT 
O21E 4F MOV CrA 

O21F CD3202 CALL NPAGE sINCR PAGE 
0222 3E42 MVI A»yLMAX 

0224 91 SUB c 


0225 08 RC *T00 BIG 


0226 
0227 
0228 
022A 
O22n 
O22E 
0231 


0232 
0233 
0236 
0239 
023A 
023D 


O23E 
0240 


0243 
0246 


0248 


O24B 
O24E 


O24F 
0250 
0252 
0253 


0256 
0257 
025A 
025B 


025C 
0250 
O25E 


O25F 
0240 
0263 
0264 
0265 
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060A 
CD0302 
on 
C22A02 
c9 


OEO? 
C30500 


SADEO4 
FE80 
C24F02 


220004 


F 


Gl -e> «> «> “TU <> «> «> 


“<> <a> “> 


> “> 


R 


<> <> 


CG) > > > 


RZ 
MOV CrA 
MVI ByLF 
ILL2: CALL OUTT sSEND LF 
DCR c 
JNZ FILL2 
RET 


RESET LINE COUNTy INCREMENT PAGES 


PAGES XRA A *GET A ZERO 
STA LCOUNT sLINE COUNT 
LDA PAGES yPAGE COUNT 
INR A 
STA PAGES 
RET 


SEND MESSAGE TO CONSOLE 


RINT3 MVI C»PBUF 
JMP BDOS 


GET NEXT BYTE FROM DISK BUFFER 


NB? LDA IBP 
CPI 80H 
JINZ READ 


READ ANOTHER BUFFER 


CALL DISKR 
XRA A 


READ THE BYTE AT BUFF+REG A 


EAD: MOV EvA 
MVI D0 
INR A 
STA IBP 


POINTER IS INCREMENTED 
SAVE THE CURRENT FILE ADDRESS 


FUSH H 

LXI H» BUFF 
DAD 0 

MOV AyM 


BYTE IS IN THE ACCUMULATOR 
RESTORE FILE ADDRESS AND INCREMENT 


POP H 
INX H 
RET 


GET A BYTE FROM MEMORY BUFFER 


ETB: FUSH H 
LHLD BUFFP 
MOV AyM 
INX H 
SHLD BUF FP 
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0268 E1 FOP H 

0269 E67F ANI 7FH sSTRIP PARITY 

026B FE1A CPI EOF 

026D CO RNZ 

O26E F1 POP FSW sRAISE STACK 
y 

O26F 3ADS504 LDA FULL sCHECK FLAG 

0272 B7 ORA A ¥ ZERO? 

0273 CA8E02 JZ FINIS *YES» DONE 

0276 CD7CO2 CALL RESET *FOINTER 

0279 C36401 JMP MAINS *GET MORE 


RESET MEMORY FOINTER 


FD a> «> «> 


027C ES ESET: PUSH H 
027D 210005 LXI H» BUFFER 
0280 22DC04 SHLD BUFFF 
0283 E1 FOP H 
0284 C9 RET 
5 
0285 110204 NONAME? LXI DyMES1 s¢POINT TO MESSAGE 
0288 CD3E02 FINI3:3 CALL PRINT 
O28B C3AE02 JMP ABOR2 


NORMAL END OF OF LISTING 


O28E 320404 INIS: STA EOFFL +SET EOF FLAG 


> Tw «> 


0291 CD1BO2 CALL FILL yOUT FAGE 


ADD AN EXTRA PAGE IF THERE IS AN ODD NUMBER 
AND P FLAG IS NOT SET 


<> <a> ~eo o> 


0294 3AD904 LDA PFLAG 

0297 B7 ORA A *ZERO? 
0298 C2AE02 JNZ ABOR2 +NO 

029B 3AD704 LDA PAGES sHOW MANY? 
O29E E4601 ANI 1 sODD? 

O2A0 CAAEO2 JZ ABOR2 9NO 


ADD BLANK FAGE TO MAKE EVEN 


<> <> > «> 


(CAN WE CALL FILL?) 


O2A3 0642 MVI ByLMAX #LINES 
O2AS 3EOA EPAGE: MVI ArvLF 
O2A7 CD0402 CALL PCHAR 
O2AA OS DCR B 
O2AB C2A502 JINZ EPAGE 
, 
ABOR23 
ABOR3;. 
O2AE 2AE004 LHLD OLDSP sOLD STACK FOINTER 
O2B1 F9 SPHL 
O2B2 C9 RET 


SETUP FILE AND OPEN FOR INFUT 


<> > ~e> 


02B3 
O2B6 
02B8 


O2BR 
O2BD 


02C0 
o2C1 
02C4 


02C5 
02C8 
02C9 
O2CB 
O2CE 
o2n1 
O2n4 
o2n7 


O2DA 
0208 
o2nC 
o2nD 
O2E0 
O2E2 
O2E5 
O2ES 
O2E7 
O2E8 
O2E9 


O2EA 
O2EC 


O2EF 
O2F2 


O2F5 
O2F8 
O2FA 
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115C00 
OEOF 
chosoo 


FEFF 
CAC5O2 


AF 
327C00 
C9 


215D00 
7E 
FE20 
CA8502 
213F24 
226800 
115D00 
C38802 


ES 

DS 

cS 
115C00 
OE14 


111104 
C3AEO2 


2ADCO4 
361A 
C3A101 


SETUP: LXI Dy FCB 
MVI C»OPENF 
CALL BDOS 


<> a> => 


<> => > 


Py er a> er 


oe «© 


- 


“Tl «> <a> o> 


“> er er ~e> 


CHECK FOR ERRORS 


CPI 255 
JZ BADOFN 
OFEN IS OK 
XRA A 
STA FCBCR 
RET 
BAD OPEN 
ADOPN: LXI Hy FCBFN 
MOV Ay 
CPI eae 
JZ NONAME 
LXI Hy ‘“?$’ 
SHLD FCBRL 
LXI DyFCBFN 
JMF FINI3 
READ DISK FILE RECORD 
ISKR$ PUSH H 
PUSH D 
PUSH B 
LXI DyFCB 
MVI CyREADF 
CALL BOS 
FOF B 
POF I 
FOP H 
ORA A 
RZ 
MAY BE EOF 
CFI 1 
JZ FEND 
LXI Dy MES2 
JMF ABORS 
FOUND DISK EOF 
END: LHLD BUFFP 
MVI Mr EOF 
JMP MAINS 


TAB COUNTER ROUTINE 
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*NO GOOD 


91ST CHAR 

sGET IT 

sFILE NAME? 

*>NO 

sSET UP FOR PRINT 
*USE INFUT FILENAME 
sFILENAME 

sQUIT 


*CHECK FOR ERRS 
90K 


+EOF 


¢GET POINTER 
sFUT IN 1A 


JUMF HERE WITH BYTE IN B 


238 


8080/Z-80 ASSEMBLY LANGUAGE 


O2FD 
O2FE 
0300 
0303 
0306 


0309 
030C 
0O30D 
O30F 
0312 


0313 
0316 
0318 
O31B 


O3S1E 
0320 
0323 
0326 
0327 
032A 
O32B 
O32E 


0331 
0333 
0336 
0339 
033C 
O33F 


0340 
0342 
0345 
0348 
0349 
034C 
O34E 
0351 
0354 
0355 


78 
FE20 
DALEO3 
CD0903 
C30302 


3AD204 


CD1RO2 
OEO1 

cDOS0O 
C3AEO02 


FEOD 
C23103 
CDEAO1 
OF 
DA1303 
AF 
320204 
C30302 


FEO9 
C24003 
CNS803 
CD0903 
C23603 
c9 


FEOC 
C20302 


CLO302 
C31B02 
Fil 

C3B901 


TABO?: MOV 


je er er we 


ow we 


4". ~< 


— <> «> «> 


INCREMENT TAB 
MAKE MODULO 8 


ABN: LDA 


INR 
ANI 
STA 
RET 


READ THE BYTE 


ONE? CALL 


MVI 
CALL 
JMP 


AvB 
TABCR 
TABN 
OUTT 


COUNTER 


TABC 
A 
7 
TABC 


sGET BYTE 
yCONTROL CHAR? 
*YES 

¥INCR COUNTER 
sSEND BYTE 


*GET TAR COUNT 


9 INCREMENT IT 


*MODULO 8 
sSAVE IT 


AFTER ABORT 


FILL 
C»CONS 
BDOS 
ABORS 


yOUT PAGE 
sREAD CONSOLE 


sRETURN 


IF CARRIAGE RETURN THEN ZERO COUNT 


ABCR: CPI 


CHECK FOR TAB 


ABI? CPI 


CR 
TABI 
ABORT 


DONE 
A 

TABC 
OUTT 


yNOT CR 


yKEY PRESSED? 
*QUIT 

*GET A ZERO 
*SET TO ZERO 
sSEND CR 


(CONTROL-I) 


TAB 
TFORM 
BLANK 
TABN 
TAB2 


CHECK FOR FORMFEED 


TFOR2: POF 


“> o> “o> 


SEND A BLANK 


FORMFD 
OUTT 
FFLAG 


*>NOT TAB 

*SEND A BLANK 
¥INCR TAB COUNT 
+MORE 

¢NO FRINT 


y9NO 
sFORM FEED OPTION? 


sOTHER CONTROL 
sNORMAL FORMFEED 


yRESTORE STACK 
yNEXT BYTE 
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3E20 
C30402 


DBC4 
FEFF 
cs 
SAU304 


320304 
210DE03 
CDA703 
21ED03 


CD8A03 
21FF03 


7E 
B7 
cs 
CD0402 
23 
C38A03 


1600 


cpocDno3 


BLANK: MVI Ay’ ¢ 
JMP PCHAR 

’ 

CLOCK: IN ADATA 
CFI OFFH 
RZ 
LDA TIME2 
ORA a 
RZ 
XRA a 
STA TIME2 
LXI Hy MON 
CALL DATE 
LXI H» HOUR 
CALL TIME 
LXI Hy P DATE 
CALL SEND 
XRA A 
STA FCBt+13 
LXI He FCBFN 
CALL SEND 
LXI Hy SCRLF 


A 
; 
7 
, 
* 
gy 

Ss 


SEND MESSAGE TO LIST 


END: MOV Arm 
ORA A 
RZ 
CALL FCHAR 
INX H 
JMP SEND 

y 

¢ READ A DIGIT 

y 

ROIGIT: MOV Ard 
OUT ADATA 
IN ALATA 

DWAIT: IN ACONT 
ANT 80H 
JZ DWAIT 
IN ALATA 
ANI OFH 
ORI 30H 
RET 


y 


#READ-DATE ROUTINE 
; 


DATE: 


<a> er er 


XRA A 
OUT BDATA 
MOV CrA 


READ FOUR DIGITS 


READ4: MVI Lyd 

RD4: CALL RDIGIT 
CALL RSDIG 
MOV Art 
CPI 20H 
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sSEND IT 
*BOARD PRESENT? 


y9NO 
sPASS? 

+ ZERO? 
sNOT 1ST 


sSET 1ST 


sGET IT 


sPOINT DATE/TIME 


sGET A ZERO 
sNAME END 
yNAME START 
* SHOW 


*GET BYTE 

sZERO AT END 

> DONE 

§SEND CHARACTER 
sINCREMENT POINTER 


sSELECT DIGIT 


sRESET INTERRUPT 
*DIGIT PRESENT? 


sLOOP UNTIL READY 
sREAD A DIGIT 


+MASK 
sCONVERT TO ASCII 


sDATE DISPLAY MODE 


sTHIS IS DATE 


*SELECT FIRST DIGIT 


sDELAY ONE DIGIT SCAN 


sREAD & STORE DIGIT 


#TWO DIGITS DONE? 
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O3B6 C2BA03 JNZ SKIF *SKIF A PLACE 

O3B9 23 INX H sSKIP 3 OR / 

O3BA FE40 SKIP; CPI 40H 

O3BC C2AN03 JNZ RD4 9GET ANOTHER DIGIT 
O3BF C9 RET 


READ TIME & READ AND STORE DIGIT 


—j > > we 


O3CO 3E40 IME? MVI Av40H TIME DISPLAY MODE 
O3C2 D3Cé6 OUT BIIATA 
03C4 OEO1 MVI Col *THIS IS TIME 
03C46 CDAROZ CALL READ4 sGET 4 DIGITS 
03C9 23 INX H sSKIF COLON 
O3CA CDCDO3 CALL RSDIG 
O3CD CN9403 RSDIG? CALL RDIGIT 
0300 77 MOV MrA STORE BYTE 
O3D1 23 INX H sINCK FOINTER 
O3D2 7A MOV Art 
03D3 C610 ADI 10H 
O3DS 57 MOV DvA 
0306 C9 RET 
’ 
s#STORAGE AREA 
, 
POATE? 
O3D7 010A446174 DB CRyLFy’Date ’ 
O3DE 78782F MON? Dg “xx/ +MONTH 
O3E1 78782F DR “xx / > DAY 
O3E4 3830 DR “80° ¥ YEAR 
O3E6 2020546960 DB ‘ Time ’ 
O3ED 78783A HOUR? [IB “HRxS/ s#HOURS 
O3FO 78783A DB “xx sMINUTES 
O3F3 7878 DR “xx sSECONDS 
O3FS 2020204669 DB i File: ‘20 
O3FF ODOAO0O SCRLF? DB CRyLF +0 
0402 ODOA4SESF20MES1 2 DB CRyLF»’No file names’ 
0411 ODOA444S973MES23 DB CRoLF» Disk errors’ 
O41E ODOA RULES? OB CReLF 
0420 $0726F6772 DB ‘Program to list ASCII files’ 
O43B ODOA204F70 DB CReLF»’ Ortions?: ’ 
0446 2028634686F 0B ‘ (choose one)’ sCRrLF 
0455 2020462061 DB ‘ F adds form feeds’ »CRyLF 
046A 2020502073 0B ‘ FP skips extra even rade’ 
0483 2061742065 DB ‘ at end’ »CReLF 
048C 2020446563 DE ‘ Decimal number skirs ’ 
0403 6C596ES65S73 DB ‘lines at besinning’ »CR»yLFeLF 
O04B8 2050726573 DB ‘ Press any key to abort,’ 
0400 0A24 DB LF» ‘$$’ 
0402 00 TABC? DB 0 #TAB COUNTER 
0403 80 TIME2: OB 80H sPASS 
04D4 FF EOFFL: DB OFFH sEOF FLAG 
0405 00 FULL? DB (0) sFULL FLAG 
04D6 02 LCOUNT?: DB 2 sLINE COUNT 
0407 00 PAGES: DB (0) yPAGE COUNT 
0408 00 FFLAG? DB c¢) sFORMFEED FLAG 
o4n9 00 PFLAG: DB 0 sEXTRA-PAGE FLAG 
O4DA 0000 SKIFB: DW c¢) sLINES TO SKIF 
04DC 0005 BUFFF: [iW BUFFER #FOINTER 
O4DE IBF? bs 2 sINPUT BUFF POINTER 
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a 


, 


; STACK AREA 
O4E0 OLUSF: DS 2 ,OLD STACK 
O4E2 ns 30 §STACK SFACE 
STACK: yNEW STACK 
0500 BUFFER: 21S 1 yMEMORY BUFFER 
’ 
0501 END 


LIST can be executed by the command 
A>LIST <filename> <ortional arsgument> 


The CP/M system copies LIST into memory at 100 hex and branches to it. 
The first step is to save the incoming stack pointer and set up a new one. The 
clock routine is executed next. The routine shown in Listing 10.2 is written 
for a Computime R clock board, but the program can be altered to accommo- 
date other methods of timekeeping. The first step of the clock routine is to 
see if there is a clock board in the computer. One of the clock ports, at 
address ADATA, is read. If there is no port at this I/O address, the computer 
will read a value of FF hex. This will harmlessly terminate the subroutine 
with a return instruction. 

If a clock board is present, then the first line of the printer output will 
appear in the form 


Date 06/15/80 Time 13:318233 FILE: <filename> 


The next step is to see if one of the three optional arguments was given after 
the filename. These arguments are: 


F (add form feeds) 
P (no extra page at end) 
decimal number (skip lines at beginning) 


The letter F is used to insert form feeds every 58 lines of the listing. The 
command looks like this. 


A>LIST SORT.PAS F 


This feature is useful for listing BASIC, FORTRAN, Pascal, or assembly- 
language source programs. If this argument is selected, the proper number of 
line feeds is generated as the end of the page is approached. This step causes 
the printer to skip over the fold in the paper. Also, any form feeds that are 
encountered are ignored. 

If the letter P is given for the argument, then no extra blank page is 
generated at the end. This argument can be used to save paper when several 
one-page files are printed. 
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Another possible argument to LIST is a decimal number. In this case, 
the argument tells how many lines of the file are to be skipped. For example, 
the command 


A>LIST LINFIT.FOR S00 


will skip the first 500 lines and start the listing with line 501. Use this option 
if you want to print the last part of a long file but don’t want to wait for the 
first part to be printed. 

At this point, the disk directory is searched for the requested filename. 
This filename is retrieved from the file-control block at address 5C hex. If 
the requested filename can’t be found in the directory, then the filename is 
printed on the console along with a question mark. LIST is then aborted. If 
no filename was entered, an error message stating this fact appears on the 
console. LIST is aborted in this case also. LIST could have been programmed 
to handle input errors the way that the GO routine does. Then, instead of 
aborting, LIST would ask for the filename to be entered again. The addition 
of this feature is left as an exercise for the reader. 

If the filename exists in the directory, then the requested disk file is 
read. The proper number of lines are skipped over if the second argument of 
the command line was a valid decimal number. At this point, the disk file is 
read into memory. The FDOS address located at address 7 is checked to see 
how much memory is available. The entire file will be copied into memory 
if there is room. A check is made to see if the disk end-of-file character is 
encountered before the available memory is filled. 

In either case, the date and time of day are printed first. Then the data 
in memory are printed. The first character is ignored if it is an ASCII form 
feed. This will prevent a page eject immediately after the date and time. The 
ASCII tab character is properly expanded by the routine TABO. The number 
of lines is counted. When a form-feed character is encountered, the proper 
number of line feeds is issued to fill out the page. If the F argument was 
given, the form feeds will be automatically issued. 

LIST can be aborted at any time during the printing by pressing any 
console key. The console is checked for this after each carriage return. The 
CP/M program DUMP is set up a little differently. The disk data are read 
into a 128-byte buffer, rather than into the memory area above 100 hex. 
Using a small buffer has the advantage that programs can be stored in mem- 
ory during the DUMP operation and they will not be erased. But, in return, 
there is a lot of disk activity. The disk must be accessed every 128 bytes. 


COPY A DISK FILE INTO MEMORY 


If you have programmed one of the tape routines given in Chapter 8, then 
you can make backup copies of your disk files. But you have to first copy 
the disk file into memory. The copy step can be performed with the debug- 
ger DDT or SID. 
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A*SID <filename> 


This command loads the debugger at address 100 hex and branches to it. The 
debugger relocates itself into high memory, then copiés the requested disk 
file into memory starting at 100 hex. The address of the end of the disk file 
in memory is printed in hexadecimal. This address can be used in conjunc- 
tion with the memory map given in Appendix B to determine the number of 
256-byte blocks in the file. For example, if DDT gives a value of 13AF, then 
the disk file occupies 19 (decimal) blocks of 256 bytes. 

When the file has been copied into memory, the G command in the 
debugger can be used to branch to the tape routine. Then the SAVE com- 
mand can be given to make a copy on tape. The process can be reversed by 
loading the file into memory from tape. Branch to address zero to restart 
CP/M. Finally, give the SAVE command 


A>SAVE XX <filename> 


where XX is the decimal number of 256-byte blocks to be saved. 

This procedure can be simplified by using the FETCH program given in 
Listing 10.3. FETCH uses CP/M for all I/O and disk operations, so it should 
work with all standard CP/M systems. There are, however, 2 items that need 
to be customized. Fetch is initially loaded into memory at 100 hex. It then 
automatically relocates itself to higher memory. The relocation address is 
chosen to be F400 hex in Listing 10.3. You may have to change it to some 
other address if this region is not available. The address is defined by the 
label ORIGIN in the source program. After FETCH copies the requested disk 
file into memory, it branches to your tape routine. This address, defined by 
the label MONIT, is chosen to be F000 hex in Listing 10.3 MONIT should be 
changed to your tape address. 


Listing 10.3. Cory a disk file into memory, 
(date goes here) 
ITLE ‘Cory a disk file into memory.’ 


THIS FROGRAM RELOCATES ITSELF TO HIGH MEMORY THEN 
COPIES A DISK FILE TO MEMORY STARTING AT 100 HEX. 
ASCII AND COM FILES ARE CORRECTLY HANDLED. 

GIVE A THIRD ARGUMENT OF B FOR OTHER BINARY FILES. 
A 1A EOF CHARACTER IS FUT AT THE END ASCII FILES. 
THE LAST ADDRESS AND DECIMAL BLOCK SIZE ARE GIVEN. 
FINALLY A JUMP IS MADE TO THE ADDRESS OF MONIT. 


QUITS IF NO READ-WRITE MEMORY AT NEW LOCATION 


“SD E> “E> “E> “Er “Er Er “er “ar Er E> —|j er “a> 


FOOO = MONIT EQU OFOOOH #GO HERE WHEN DONE 

F400 = ORIGIN EQU OF400H #RELOCATE FETCH HERE 
, 

0100 = BUFFER EQU 100H *START MEMORY BUFFER 

0005 = BDOS EQU 5 sDOS ENTRY FOINT 
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0002 
0009 
OOOF 
0014 
ooon 
000A 
OO1A 


00SC 
0080 


F400 


F400 
F403 
F406 
F409 
F40A 


Houd i tou 


oui 


210000 


112A01 
2100F4 
O1ACO1 


C300F4 


C346F4 
CDOBF4 
2AAEFS 
F9 
c9? 


TYPEF 
PRUF 

OPENF 
READF 


- 


; 
’ FILE 
, 


BLOCK 


<> <> => 


LOOP: 


EQU 
EQu 
EQU 
EQU 
EQU 
EQU 
EQU 


EQu 
EQU 


2 

9 
15 
20 
ODH 
OAH 
1AH 


SCH 
80H 


sCONSOLE OUTFUT 
sFRINT CONSOLE BUFFER 
sFILE OPEN 

sREAD FUNCTION 
*CARRIAGE RETURN 
sLINE FEED 

vEND OF FILE 


sFILE CONTROL BLOCK 
sINPUT DISK BUFFER ADDR 


CONTROL BLOCK DEFINITIONS 


EQU 
EQu 
EQU 
EQU 


100H 


LXI 
DAD 
SHLD 
LXI 
LXI 
SHLD 


FCBt1 


FCRt9 
FCBt12 
FCBt32 


HrO 
SF 
OLDSP 


SP»ySTACK 
Hy BUFFER 


BUFFP 


sFILE NAME 

sFILE TYPE 

sCURRENT REEL # 
*NEXT REC # (0-127) 


OLD STACK AND SET UP NEW STACK 


*ZERO HL 

sADD IN STACK 
*SAVE STACK 
sDEFINE NEW STACK 


sMEMORY FOINTER 


MOVE REST OF FROGRAM 


LXxI 
LXI 
LXI 
LDAX 
MOV 


ORIGIN 


JMP 
CALL 
LHLD 
SPHL 
RET 


D,OLDST sOLD START 
HySTART #NEW START 

By IBP-START *#LENGTH 

D *GET BYTE 

MA *MOVE TO NEW 
id sCHECK MEMORY 
0 sQUIT, BAD 

H s INCREMENT 

Bb » FOINTERS 

B sDECR COUNT 
ArB ¢SEE IF DONE 
c sALL MOVED? 
LOOP 3NO 

START + DONE 

OF FROGRAM 

MAIN sFINAL START 
CRLF 

OLDSF *ORIGINAL STACK 
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“ 
y 


F40B 3EOD CRLF: MVI A»CR 
F400 CD12F4 CALL PCHAR 
F410 SEOA MVI AyLF 


; 
¢ OUTFUT A CHARACTER FROM A 
; 


F412 ES FCHAR: PUSH H 

F413 0S FUSH DB 

F414 CS FUSH B *SAVED 
F415 OE02 MVI Cy TYPEF 

F417 SF MOV EvA 

F418 ChoOS0O CALL Bros 

F41B C1 POF R 

F4ic D1 FOF vt) 

F4in El FOF H *RESTORED 
F41E C9 RET 


CARRIAGE RET» LINE FEED AND FRINT 
F41F COORF4 "RINTCS CALL CRLF 


FRINT BUFFER UNTIL $ FOUND 


sen a> co “Tl er er <> 


F422 ES PRINT: FUSH H 
F423 OE09 MVI C»PBUF 
F425 CDOS00 CALL BOOS 
F428 El FOF H 
F429 C9 RET 
, 
¢ GET NEXT BYTE FROM DISK BUFFER 
, 
F42A 3AACFS GNB? LDA IEF 
F420 FE80 CFI 80H 
F42F C236F4 JNZ GO 


READ ANOTHER BUFFER 


ser <a> a> 


F432 CU3SFS CALL NISKR 
F435 AF XRA A 
y 
» REAL THE BYTE AT RUFF+REG A 
, 
F436 SF GO; MOV EvA 
F437 1400 MVI Itv0 
F439 3C INR A 
F43A 32ACFS STA IBF 
¢ FOINTER IS INCREMENTED 
y SAVE THE CURRENT FILE ADDRESS 
F430 ES FUSH H 
F43E 218000 LXI Hy RUFF 
F441 19 DAD 0 
F442 7E MOV ArM 
¢ BYTE IS IN THE ACCUMULATOR 
¢ RESTORE FILE ADDRESS AND INCREMENT 
F443 E1 FOF H 
F444 23 INX H 
F445 C9 RET 


———————_———— OL 
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j 
MAIN? 
y 
* REAL BYTES FROM DISK AND FUT IN MEMORY 
y 
F446 CIN6F4 CALL SETUF *SET UP INFUT FILE 
F449 3E80 MVI A» 80H 
F44B 32ACFS STA IBF sRUFFER FOINTER TO 80H 
y 
F44E CDU2AF4 MAINZ? CALL GNB *GET A BYTE 
F451 ES PUSH H 
F452 2AA9FS LHLD BUF FP +MEMORY FOINTER 
F435 77 MOV MrA sFUT BYTE IN 
F456 23 INX H 
F457 22A9FS SHLD BUFFF *SAVE FOINTER 
F45Aa 47 MoV ByA 
F4SB 3EFF MVI Ay OFFH 
F450 BI CMF L sL=O0? 
F4SE C2é6AF4 JNZ MAIN4 *NO 
F461 3A0700 LIA 7 yFDOS 
F464 [160A SUI 10 gCCP ~1 
F466 BC CMP H *TOO BIG? 
F467 DA2FFS Jc TOOBIG #WON‘’T FIT 
’ 
F46A El MAIN4S: FOF H 
F446B 3AABFS LIA BFLAG +BINARY FILE? 
F46E 87 ORA A 
F46F C24EF4 JNZ MAIN2 ¥YES 
F472 78 MOV AyB iGET BYTE 
F473 FE1A CPI EOF 
F475 C24EF4 JNZ MAIN2 ¥NO 
F478 2AA9FS LHL BUF FF #FPOINTER 
F47B 2B * MAINS: IlICx H 
F47C 118AFS DONE? LXI Dy MESA 
F47F CU22F4 CALL PRINT 
F482 CDBIF4 CALL OUTHL yPRINT IT 
F485 1199FS LXI tyMESE 
F488 Cl22F4 CALL FRINT 


CONVERT FILE LENGTH TO DECIMAL K 


ser “en er 


F48B 7C MOV AyH 

F48C 24600 MVI H»O yLEADING O FLAG 
F48E 1644 MVI fly 100 

F490 OE2F HM33 MVI Cr’O’~1 

F492 0C HM23 INR C 

F493 92 SUB i 9100/10 

F494 N292F4 JNC HM2 VSTILL PLUS 
F497 82 ADD 0 yALD BACK 

F498 47 MOV BA +SAVE REMAINDER 
F499 79 MOV ArC 9GET 100S/TENS 


SUFFRESS LEADING ZEROS 


‘> cr a> 


F49A FES1L CFI ‘1’ sLESS THAN 1? 
F49C Ll2ASF4 JNC HM4 ¥NO 
F49F 7C MOV ArH yCHECK FLAG 


F4A0 B87 ORA A *ZERO? 


F4Al 
F4a2 
F4AS 
F4A8 
F4AA 
F4AB 
F4an 
F4AE 
F4AF 
F4R2 
F4B4 
F4B7 
F4BA 


F 4B 
F4BE 
F4C1 
F4C2 
F4C3 
F4C4 
FACS 
F4C6 
F4C7 
FACA 
F4CE 
F4CD 
FACF 
F ALO 
Fane 
F4D3 


F4né 
F407 
FADIA 
F4DD 
F4ne 
F4E0 
F4E3 
F4E4 
F4E6 
F4E9 
F4ER 


FAEE 
F4F 4 
F4F3 


F4F6 
F4F8 
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Cp1i2F4 
CLOBF4 
C300FO 


4c 
CLIC2F4 
40 


1F 
CUCBF4 
79 
E60F 
C490 
27 
CE40 
27 
C312F4 


S2ARFS 


115C00 
OEOF 
CLOSO0O 


FEFF 
CAOEFS 


247 


MOV ArC sRESTORE BYTE 
JZ HMS ¢IF LEADING 0 
HM43 CALL PCHAR 91ST» 2ND0 DIGIT 
MVI HyOFFH ¥#SET FLAG 
HMS; MOV Ay 
SUI 90 #100 TO 10 
MOV DvA 
MOV AyB 
JNC HM3 ¥ ONCEMORE 
ADI ‘OQ’ yASCII BIAS 
CALL FCHAR 93R0 DIGIT 
CALL CRLF 
JMF MONIT 9 DONE 
y 
» CONVERT BINARY IN Hel TO ASCIT HEX 
y 
OUTHL? MOV CyvH 
CALL OUTHX 
MOV Crk 
OUTHX: MOV ArC 
RAR 
RAR 
RAR 
RAR 
CALL HEX1 
MOV ArC 
HEX1: ANI OFH sOUTFUT HEX BYTE 
All 9OH 
DAA gINTEL DAA TRICK 
ACI 40H 
DAA 
JMF FCHAR 
y 
¢ SETUP FILE ANI) OFEN FOR INPUT 
¢ CHECK FOR BINARY FILE 
y 
SETUP? XRA A ¥ZERO 
STA BFLAG gNOT BINARY FILE 
LHLD FCBFT gFILE TYFE 
MOV ArL 91ST CHAR 
CFI “Cis 
JNZ BINCH +NO 
MOV AvH ¥SECOND CHAR 
CFI ‘0’ 
JNZ BINCH *NO 
OPN2: MVI Ay EOF 9SET FLAG 
STA RFLAG 
7 
+ SETUP FILE ANDI OFEN FOR INPUT 
, 
OFNS3 LXI tty FCR 
MVI C,yOPENF 
CALL BDOS 
y 
§ CHECK FOR ERRORS 
y 
CFI 255 
JZ BADOFN +¢NO GOOD 
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; 
+ OFEN IS OK 
; 
F4FR AF XRA A 
F4FC 327600 STA FCRCR 
F4FF C9 RET 
: 
+ KE FOR THIRD ARGUMENT MEANS BINARY FILE 
; 
F500 216n00 BINCH! LXI Hy 60H 
F503 7E MOV ArM $GET THIRD ARGUMENT 
F504 E657 ANI 57H SLOWER TO UPPER 
F506 FE42 CFI “Be 
F508 C2EEF4 JINZ OFN3 #NOT BINARY 
FSOR C3E9F4 JMP OFN2 ; BINARY 
; 
+ BAD OFEN 
; 
F50E 215D00 BADOFN: LXI HyFCRFN $18T CHAR 
F511 7E MOV ArM $GET IT 
F512 FE20 CFI a #FILE NAME? 
F514 CA26FS JZ NONAME NO 
F517 213F24 LXI Hy ’?$’  $SET UF FOR FRINT 
F51A 226800 SHLD FCBRL  $USE INPUT FILENAME 
F510 115000 xT liyFCBFN $FILENAME 
F520 CL22F4 CALL PRINT 
F523 C303F4 JMP FINIS  $QUIT 
; 
F526 1162F5 NONAMES LXI lyMES1 $FOINT TO MESSAGE 
F529 CDIFF4 NONAM2! CALL FPRINTC 
F520 C303F4 JMP FINIS 
; 
F52F 117AF5 TOOBIG! LXI ly MES4 
F532 C329F5 IMF NONAM2 


, 
y READ DISK FILE RECORD 
; 
0D 


FS35 ES ISKR: FUSH H 
F536 0S FUSH f) 
FS37 CS FUSH B 
FS38 115C00 LXI tyFCR 
FS3B OE14 MVI Cy READF 
FS3D Chosoo CALL BRDOS 
F340 Cl FOF BE 
F541 D1 FOF ni 
FS42 E1 FOF H 
F543 B7 ORA A ¥CHECK FOR ERRS 
F544 C8 RZ vOK 
y 
» MAY BE EOF 
’ 
F545 FEOL CFI 1 
F347 CAS3FS JZ FEN vEOF 
’ 
¥ INCORRECT FILE NAME 
’ 
FS4A L1I6FFS LXI DyMES2 
F540 ChIFF4 CALL PRINTC 
F550 C303F4 JMP FINIS 


ee 
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FOUND DISK EOF 


“T} ~ar er seo 


F353 2AA9FS END? LHLD BUFFF ¢GET FOINTER 


FS56 SAABFS LDA BFLAG 9COM FILE? 
FSS9 B7 ORA A 

FSSA C27BF4 JNZ MAINS sYES 

FSSD 361A MVI Mv EOF yFPUT EOF 
FSSF C37CF4 JMF DONE 


e 


y 


+STORAGE AREA 


y 
FS62 4E6F2066469MES13 DE ‘No file names’ 
FSG6F 44469736B20MES23 DE ‘Disk error$’ 
FS7A 46696C4S520MES43 UB ‘File is too bist’ 
FS8A 4061737420MESA: ba) :] ‘Last address: $%’ 
FS99 206865782CMESB?: ba} 3) ‘ hexr Blocks? $$’ 
FSA9 0001 BUFFF: DW BUFFER #FOINTER 
; 
FSAR BFLAG? DS 1 sRINARY FLAG 
FSAC IBF: ns 2 9INFUT BUFF FOINTER 
, 
; STACK AREA 
3 
FSAE OLDUSF: 0S 2 ,OLD STACK 
FSBO US 24 ¢STACK SPACE 
STACK? 
; 
FSc8 END 


One of the advantages of FETCH is that it is considerably smaller than 
DDT or SID. In addition, the decimal number of blocks to be saved and the 
last address of the program are given. FETCH is executed just like the 
debugger. 


A>FETCH <filename>.<extension> 


The CP/M system loads FETCH at 100 hex and then branches to it. The 
instructions at the beginning of FETCH are used to relocate the rest of the 
program into a preselected memory area. A jump is then made to the relo- 
cated FETCH. 

FETCH loads the selected disk file into memory starting at 100 hex. 
An ASCII file is copied up to the 1A end-of-file mark. Typical extension 
names include the following. 


ASM (assembly language) 
PAS (Pascal) 

FOR (FORTRAN) 

BAS (BASIC) 

HEX  (hex-encoded binary) 
TEX (text formatter) 

LIB (library) 

MAC (assembly language) 
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Executable binary files will have a file extension of COM; the entire file will 
be copied in this case. If a nonexecutable binary file is loaded, an additional 
argument of B (for binary) must be given. 


FETCH SORT.REL B 


Examples of executable binary files are 


REL (relocatable) 
INT (intermediate) 


Relocatable files generated by the Microsoft assembler, and the FORTRAN, 
COBOL, and BASIC compiler are of this type. Intermediate files are pro- 
duced by CBASIC. 

After the disk file*is loaded, FETCH prints two numbers. One number 
is the memory address of the end of the file expressed in hex. The other 
number is the size of the file. The number of 256-byte blocks is printed, 
in decimal. 

Type up the program given in the listing. Assemble it and load it into 
memory with the debugger 


A>DNT FETCH.HEX 
The debugger will load the move routine, the first part of FETCH, into 
memory at 100 hex. The main part of the program, however, will be loaded 
at the address of ORIGIN, OF 400 hex in this case. Use the debugger to move 
the main part of FETCH back down to the beginning of the user area. 

MF400 FSFF 12A 


Now, return to the CP/M system with a control-C and save the combination 
of the move program and the main part of FETCH. 


A>SAVE 2 FETCH.COM 


FETCH is now ready for use. 
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APPENDIX A 
The ASCII Character Set 


The ASCII character set is listed in numerical order with the corresponding 
decimal, hexadecimal, and octal values. The control characters are indicated 
with a caret (A). For example, the horizontal tab (HT) is formed with a 
control-I. 


c0) 00 000 “@ Null e@ 
1 01 001 “A Start of heading A 
2 02 002 “RK Start of text RB 
3 03 003 “CC End of text Cc 
EOT 4 04 004 “D End of transmission n 68 44 104 
Ss OS 005 “E Eneuiry E 
6 06 006 “F Acknowledge F 
7 07 007 “G Bell G 


BS 8 08 010 “H Kacksrace H 
9 09 011 “I Horizontal tab I 
LF 10 OA 012 “J Line feed J 
VT 411 OB 013 “K Vertical tab K 
FF 12 oc 014 “L Form feed L 76 4C 114 
CR 13 oD 015 “M Carriage return M 
so 14 OE 016 “N Shift out N 
SI 15 OF 017 “O Shift in ia) 


DLE 14 10 020 “F Data link escare FP 
DC1 17 11 021 “Q Device control 1 Q 
DC2 18 12 022 “KR Device control 2 R 
DC3 19 13 023 “S Device control 3 Ss 83 53 123 
DC4 20 14 024 “T Device control 4 T 
NAK 21 15 025 “U Negative acknowledge U 
SYN 22 16 026 “VY Synchronous idle Vv 
ETB 23 17 027 “W End transmission block W 


CAN 24 18 030 “X Cancel xX 

EM 25 19 031 “Y End of medium Y 

SUB 26 1A 032 “Z Substitute Z 90 SA 132 
C 
\ 
a 


ESC 27 1B 033 “C Escare 

FS 28 1C 034 “\N File serarator 
GS 29 it 035 “J Grour serarator 
RS 30 1E 036 “* Record serarator 
US 31 1F 037 “_ Unit serarator - 95 oF 137 
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63 oF 077 DEL 127 7F 177 Delete 


APPENDIX B 
A 64K Memory Map 


The 8080 and Z-80 microprocessors can directly address 64K bytes of 
memory. The memory area is mapped out in the chart that follows. Each entry 
represents a 256-byte block. The high-order byte of the address is given in hex 
then in octal. For example, the first entry of the second column is: 


20 040 32 


This represents an address range of 2000 to 2FFF hex, or 040-000 to 040- 
777 octal. The third column gives the decimal number of 1K blocks. The fourth 
column is the decimal number of 256-byte blocks starting at the address 100 
hex. As an example, suppose that a CP/M program runs from 100 hex to 3035 
hex. The 30 hex entry in the table shows that the program contains 48 decimal 
blocks of 256-byte size. The program can be saved with the CP/M command: 


A>SAVE 48 filename 


As another example, if you have two, 16K memory boards starting at 
address zero, then your top of memory is located at address 7FFF hex. 


255 
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Hex Oct K Bl Hex Oct K Bl Hex Oct K Bl Hex Oct KK Bl 


00 000 0 | 20 040 32 | 40 100 64 | 60 140 96 
01 001 1 | 21 041 33 | 41 101 65 | 61 141 97 

2 002 2 | 22 042 34 | 42 102 66 | 62 142 98 

03 003 1 3 | 23 043 9 35 | 43 103 17 67 | 63 143 25 99 
SSS SSS SSS SSS KS SSS SS SSS SSS SS SSS SSS SS SSS SSS SSS TSS ST SSS SSS STS = 
04 004 4 | 24 044 36 | 44 104 68 | 64 144 100 
05 005 5 | 25 045 37 | 45 105 69 | 65 145 101 
06 006 6 | 26 0446 38 | 46 106 70 | 66 146 102 
07 007 2 7 | 27 047 10 39 | 47 107 18 71 | 67 147 26 103 
08 010 8 | 28 050 40 | 48 110 72 | 68 150 104 
09 O11 9 


I 
10 020 16 30 060 48 SO 120 80 79 160 112 
11 021 17 31 061 49 S1 121 81 71 =«161 113 
12 022 18 32 062 30 92 122 82 72 162 114 
13 023 5 19 33 063 13 51 93 123 21 83 73 163 29 115 
14 024 20 34 064 32 54 124 84 74 164 116 
15 025 21 35 065 53 55 125 85 75 =(165 117 


19 031 25 39 O71 o7 v9? 131 89 79 171 121 
1A 032 26 3A 072 58 SA 132 90 7A 172 122 
1B 033 7 27 3B 073 15 59 SB 133 23 91 7K 173 31 123 
1C 034 28 3C 074 60 sC 134 92 7C 174 124 
10 035 29 30 075 61 So 135 93 70 175 125 
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Hex Oct K Bl Hex Oct K Bl Hex Oct K Bl Hex Oct K_ Bl 


r-¥ $f -F_4 4.4 _f 4 Ff 4 ¥ 4 7 7 ¥ ff $f. } $$ $$ $$$ 5 _f _¥_}_} $$ _f._}..¢_+. $$ __¥._} 5} 4-5 -5-_¥__4_¥_F_-#-_-4-_}_} 5} 
80 200 128 | AO 240 160 | CO 300 192 | EO 340 224 
81 201 129 | Al 241 161 | C1 301 193 | E1 341 225 
82 202 130 | A2 242 162 | C2 302 194 | E2 342 226 
83 203 33 131 | AZ’ 243 41 163 | C3 303 49 195 | E3 343 57 227 

$F —$— $$$ 4+ $$$ $F -] SSS SSSSSSSSSSS=5 t 3 — fF $$} 7} $F $5 t---T _} $355 -— 2-745 -—- 5-4 —-3-—-5-—-5-—- 59 
84 204 132 | a4 244 164 | C4 304 196 | E4 344 228 


88 210 136 AB 250 168 C8 310 200 E& 350 232 
89 211 137 AY 251 169 Cc? 311 201 E9 151 233 


t+ —$-— $$$ 34-55-45 5 —F 1 PF —-F— 5 5 — FS Ft SSS SSS SSS SSS VSS sSsSSSSSS SS SSS SSS 
90 220 144 | BO 260 176 | DO 320 208 | FO 360 240 
91 221 145 | B1 261 177 | D1 321 209 | F1 361 241 
92 222 146 | B2 262 178 | D2 322 210 | F2 362 242 
93 223 37 147 | B3 263 45 179 | D3 323 53 211 | F3 363 61 243 
SISSSssSssSs SSS SSS sss SS SS3aSSSSS= +? —+ $f 4+ _-¥ 4 +t —+-_-4 5} + — $$ —$ $45} $F} FF + 5} 
94 224 148 | B4 264 180 | D4 324 212 | F4 364 244 
95 225 149 | BS 265 181 } DS 325 213 | FS 365 245 
96 226 150 | Bé 266 182 | Dé 326 214 | Fé 366 246 
97 227 38 151 | B7 267 46 183 | D7 327 54 215 |] F7 367 62 247 
. $$ -— F-34444 4+ - 4-1-7 .—$— F-44144 —5 +} FF - 57 sss SSSSSSS552=== } $$$ —-$—$-— 5 4-4-3 3 — 7-1 —} 
98 230 152 | BS 270 184 | D8 330 216 | F8 370 248 
99 231 153 | B9 271 185 | n9 331 217 | F9 371 249 
9A 232 154 | BA 272 186 | DA 332 218 | FA 372 250 
9B 233 39 155 | BB 273 47 187 | DB 333 55 219 | FB 373 63 251 
9C 234 156 | BC 274 188 | nC 334 220 | FC 374 252 
9D 235 157 | BD 275 189 | DD 335 221 | FD 375 253 
FE 236 158 | BE 276 190 | DE 336 222 | FE 376 254 
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The 8080 Instruction Set 
(Alphabetic) 


The 8080 instruction set is listed alphabetically with the corresponding 
hexadecimal code. The following representations apply. 


nn 8-bit argument 
nnnn 16-bit argument 


Hex Mnemonic Hex Mnemonic 
CE nn ACI nn 2F CMA 
8F ADC A 3F CMC 
88 ADC B BF CMP A 
89 ADC C B8 CMP B 
8A ADC D B9 CMP C 
8B ADC E BA CMP D 
8C ADC H BB CMP E 
8D ADC L BC CMP H 
8E ADC M BD CMP L 
87 ADD A BE CMP M 
80 ADD B D4 nnnn CNC nnnn 
81 ADD C C4 nnnn- CNZ  nnnn 
82 ADD D F4 = nnnn CP nnnn 
83 ADD E EC nnnn CPE nnnn 
84 ADD H FE nn CPI nn 
85 ADD L E4  nnnn CPO _nnnn 
86 ADD M CC nnnn CZ nnnn 
C6 nn ADI nn 27 DAA 
AT ANA A 09 DAD B 
AO : ANA B 19 DAD D 
Al ANA C 29 DAD H 
A2 ANA D 39 DAD SP 
A3 ANA E 3D DCR A 
A4 ANA H 05 DCR B 
A5 ANA L OD DCR C 
A6 ANA M 15 DCR D 
E6 nn ANI nn 1D DCR E 
CD nnnn CALL nnnn 25 DCR H 
DC nnnn CC nnnn 2D DCR L 
FC nnnn CM nnnn 35 DCR M 


Hex Mnemonic 
OB DCX B 
1B DCX D 
2B DCX H 
3B DCX SP 
F3 DI 
FB EI 
76 HLT 
DB nn IN nn 
3C INR A 
04 INR B 
0C INR C 
14 INR D 
1C INR E 
24 INR H 
2C INR L 
34 INR M 
03 INX B 
13 INX D 
23 INX H 
33 INX SP 
DA nnnn JC nnnn 
FA nnnn JM nnnn 
C3 = nnnn JMP- nnnn 
D2 nnnn JNC nnnn 
C2 = nnnn JNZ  nnnn 
F2  nnnn JP nnnn 
EA nnnn JPE  nnnn 
E2  nnnn JPO- nnnn 
CA nnnn IZ nnnn 
3A nnnn LDA nnnn 
OA LDAX B 
1A LDAX D 
2A nnnn LHLD nnnn 
01 nnnn LXI__B, nnnn 
11 = nnnn LXI D,nnnn 
21 =~ ~=nnnn LXI H,nnnn 
31  nnnn LXI- SP, nnnn 
TF MOV A,A 
78 MOV A,B 
19 MOV A,C 
TA MOV A,D 
7B MOV A,E 
7C MOV A,H 
7D MOV A,L 
TE MOV A,M 
47 MOV B,A 
40 MOV B,B 
41 MOV B,C 
42 MOV B,D 


Hex 


APPENDIX C 


259 


Mnemonic 


MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
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Hex Mnemonic Hex Mnemonic 
74 MOV M,H CF RST 1 
75 MOV M,L D7 RST 2 
3E nn MVI A,nn DF RST 3 
06 nn MVI B,nn E7 RST 4 
OE nn MVI C,nn EF RST 5 
16 nn MVI D,nn F7 RST 6 
1E nn MVI_ E,nn FF RST 7 
26 nn MVI H,nn C8 RZ 
2E nn MVI_ L,nn 9F SBB A 
36 =nn MVI M,nn 98 SBB B 
00 NOP 99 SBB C 
B7 ORA A 9A SBB D 
BO ORA B 9B SBB_ E 
Bl ORA C 9C SBB H 
B2 ORA D 9D SBB L 
B3 ORA E 9E SBB M 
B4 ORA H DE nn SBI nn 
Bd ORA L 22 nnnn SHLD nnnn 
B6 ORA M F9 SPHL 
F6 nn ORI nn 32  nnnn STA nnnn 
D3 nn OUT nn 37 STC 
E9 PCHL 02 STAX B 
C1 POP B 12 STAX D 
D1 POP D 97 SUB A 
E1 POP H 90 SUB B 
F1 POP PSW 91 SUB C 
C5 PUSH B 92 SUB D 
D5 PUSH D 93 SUB E 
E5 PUSH H 94 SUB H 
F5 PUSH PSW 95 SUB L 
17 RAL 96 SUB M 
1F RAR D6 nn SUI nn 
D8 RC EB XCHG 
C9 RET AF XRA A 
07 RLC A8 XRA B 
F8 RM AQ XRA C 
DO RNC AA XRA D 
Co RNZ AB XRA E 
FO RP AC XRA H 
E8 RPE AD XRA L 
EO RPO AE XRA M 
OF RRC EE nn XRI- nn 


APPENDIX D 


The 8080 Instruction Set 
(Numeric) 


The 8080 instruction set is listed alphabetically with the corresponding 
hexadecimal code. The following representations apply. 


nn 8-bit argument 
nnnn 16-bit argument 


Hex Mnemonic Hex Mnemonic 
00 NOP 1E nn MVI E,nn 
01 = nnnn LXI B,nnnn 1F RAR 
02 STAX B 20 (not used) 
03 INX B 21 = ~=nnnn LXI H,nnnn 
04 INR B 22 = nnnn SHLD nnnn 
05 DCR B 23 INX H 
06 nn MVI_ B,nn 24 INR H 
07 RLC 25 DCR H 
08 (not used) 26 nn MVI H,nn 
09 DAD B 27 DAA 
OA LDAX B 28 (not used) 
OB DCX B 29 DAD H 
0c INR C 2A nnnn LHLD nnnn 
0D DCR C 2B DCX H 
OE nn MVI C,nn 2C INR L 
OF RRC 2D DCR L 
10 (not used) 2E nn MVI_ L,nn 
11 ~=nnnn LXI D,nnnn 2F CMA 
12 STAX D 30 (not used) 
13 INX D 31 = nnnn LXI SP, nnnn 
14 INR D 32  nnnn STA nnnn 
15 DCR D 33 INX SP 
16 nn MVI D,nn 34 INR M 
17 RAL 35 DCR M 
18 (not used) 36 = nn MVI M,nn 
19 DAD D 37 STC 
1A LDAX D 38 (not used) 
1B DCX D 39 DAD SP 
1C INR E 3A nnnn LDA  nnnn 
1D DCR E 3B DCX SP 
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Hex Mnemonic Hex Mnemonic 
38C INR A 6D MOV L,L 
3D DCR A 6E MOV L,M 
38E nn MVI A,nn 6F MOV L,A 
3F CMC 70 MOV M,B 
40 MOV B,B 71 MOV M,C 
41 MOV B,C 72 MOV M,D 
42 MOV B,D 73 MOV M,E 
43 MOV B,E 74 MOV M,H 
44 MOV B,H 75 MOV M,L 
45 MOV B,L 76 HLT 
46 MOV BM 17 MOV M,A 
47 MOV B,A 78 MOV A,B 
48 MOV C,B 719 MOV A,C 
49 MOV C,C TA MOV A,D 
4A MOV C,D 7B MOV A,E 
4B MOV C,E 7C MOV A,H 
4C MOV C,H 7D MOV A,L 
4D MOV C,L TE MOV A,M 
4E MOV C.M TF MOV A,A 
4F MOV C,A 80 ADD B 
50 MOV D,B 81 ADD C 
51 MOV D,C 82 ADD D 
52 MOV D,D 83 ADD E 
53 MOV D,E 84 ADD H 
54 MOV D,H 85 ADD L 
55 MOV D,L 86 ADD M 
56 MOV D,M 87 ADD A 
57 MOV D,A 88 ADC B 
58 MOV E,B 89 ADC C 
59 MOV E£,C 8A ADC D 
5A MOV E,D 8B ADC E 
5B MOV E,E 8C ADC H 
5C MOV £,H 8D ADC L 
5D MOV E,L 8E ADC M 
5E MOV E,M 8F ADC A 
5F MOV E,A 90 SUB B 
60 MOV H,B 91 SUB C 
61 MOV H,C 92 SUB D 
62 MOV H,D 93 SUB E 
63 MOV H,E 94 SUB H 
64 MOV H,H 95 SUB L 
65 MOV H,L 96 SUB M 
66 MOV H,M 97 SUB A 
67 MOV H,A 98 SBB B 
68 MOV L,B 99 SBB C 
69 MOV L,C 9A SBB D 
6A MOV L,D 9B SBB E 
6B MOV L,E 9C SBB H 
6C MOV L,H 9D SBB L 


Hex Mnemonic 
SBB M 
SBB A 
ANA B 
ANA C 
ANA D 
ANA E 
ANA H 
ANA L 
ANA M 
ANA A 
XRA B 
XRA C 
XRA D 
XRA E 
XRA H 
XRA L 
XRA M 
XRA A 
ORA B 
ORA C 
ORA D 
ORA E 
ORA H 
ORA L 
ORA M 
ORA A 
CMP B 
CMP C 
CMP D 
CMP E 
CMP H 
CMP L 
CMP M 
CMP A 
RNZ 
POP B 
nnnn JNZ  nnnn 
nnnn JMP- nnnn 
nnnn CNZ _ nnnn 
PUSH B 
nn ADI nn 
RST 0 
RZ 
RET 
nnnn JZ nnnn 
(not used) 
nnnn CZ nnnn 
nnnn CALL nnnn 
nn ACI nn 


Hex 


nnnn 
nn 
nnnn 


nn 


nnnn 
nn 
nnnn 


nn 


nnnn 


nnnn 


nn 


nnnn 


nnnn 


nn 


nnnn 


nnnn 


nn 


nnnn 


nnnn 


nn 


APPENDIX D 
Mnemonic 

RST 1 
RNC 
POP D 
JNC nnnn 
OUT nn 
CNC nnnn 
PUSH D 
SUI nn 
RST 2 
RC 
(not used) 
JC nnnn 
IN nn 
CC nnnn 
(not used) 
SBI nn 
RST 3 
RPO 
POP H 
JPO- nnnn 
XTHL 
CPO _nnnn 
PUSH H 
ANI nn 
RST 4 
RPE 
PCHL 
JPE  nnnn 
XCHG 
CPE nnnn 
(not used) 
XRI- nn 
RST 5 
RP 
POP PSW 
JP nnnn 
DI 
CP nnnn 
PUSH PSW 
ORI nn 
RST 6 
RM 
SPHL 
JM nnnn 
EI 
CM nnnn 
(not used) 
CPI nn 
RST 7 
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APPENDIX E 


The Z-80 Instruction Set 
(Alphabetic) 


The Zilog Z-80 instruction set is listed alphabetically with the corresponding 
hexadecimal values. The following representations apply. 


nn 8-bit arguments 
nnnn 16-bit arguments 
dd 8-bit signed displacement 


* instructions common to the 8080 

Hex Mnemonic Hex Mnemonic 
8E * ADC A,(HL) 19 * ADD  HL,DE 
DD 8Edd ADC A,(IX+dd) 29 * ADD  HL,HL 
FD 8Edd ADC A,(1Y+dd) 39 * ADD HL,SP 
8F * ADC A,A DD 09 ADD _ IX,BC 
88 * ADC A,B DD 19 ADD _ IX,DE 
89 * ADC A,C DD 29 ADD = IX,IX 
8A * ADC A,D DD 39 ADD _ IX,SP 
8B * ADC A,E FD 09 ADD _ IY,BC 
8C * ADC A,H FD 19 ADD _ IY,DE 
8D * ADC A,L FD 29 ADD _IY,IY 
CE nn * ADC A,nn FD 39 ADD _ IY,SP 
ED 4A ADC HL,BC A6 * AND (HL) 
ED 5A ADC HL,DE DD Aédd AND _ (IX+dd) 
ED 6A ADC HL,HL FD A6dd AND (IY+dd) 
ED 7A ADC HL,SP AT * AND A 
86 * ADD A,(HL) AO * AND B 
DD 86dd ADD A,(IX+dd) Al * AND C 
FD 86dd ADD A,(IY+dd) A2 * AND OD 
87 * ADD A,A A3 * AND E 
80 * ADD A,B A4 * AND 4H 
81 * ADD AC A5 * AND L 
82 * ADD A,D E6 nn * AND nn 
83 * ADD A,E CB 46 BIT 0,(HL) 
84 * ADD  A,H DD CBdd46 BIT 0,(IX+dd) 
85 * ADD A,L FD CBdd46 BIT 0,([Y+dd) 
C6 nn * ADD A,nn CB 47 BIT 0,A 
09 * ADD ~ HL,BC CB 40 BIT 0,B 
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FD CBdd4E 


FD CBdd5E 


DD CBdd6E 
FD CBdd6E 
CB 6F 


Mnemonic 

BIT 0,C 

BIT 0,D 

BIT 0,E 

BIT 0,H 

BIT 0,L 

BIT 1,(HL) 
BIT 1,([X+dd) 
BIT 1,(TY+dd) 
BIT 1,A 

BIT 1,B 

BIT 1,C 

BIT 1,D 

BIT 1,E 

BIT 1,H 

BIT 1,L 

BIT 2,(HL) 
BIT 2,(IX+dd) 
BIT 2,([Y+dd) 
BIT 2,A 

BIT 2,B 

BIT 2,C 

BIT 2,D 

BIT 2,E 

BIT 2,H 

BIT 2,L 

BIT 3,(HL) 
BIT 3,([X+dd) 
BIT 3,([Y+dd) 
BIT 3,A 

BIT 3,B 

BIT 3,C 

BIT 3,D 

BIT 3,E 

BIT 3,H 

BIT 3,L 

BIT 4,(HL) 
BIT 4,(IX+dd) 
BIT 4,(1Y+dd) 
BIT 4,A 

BIT 4,.B 

BIT 4,C 

BIT 4,D 

BIT 4,E 

BIT 4,H 

BIT 4,L 

BIT 5,(HL) 
BIT 5,([X+dd) 
BIT 5,([Y+dd) 
BIT 5,A 


* *¥ *¥ %*¥ * *¥He He KF KH 


* * * *¥ %¥ ¥F K ¥ 


Mnemonic 
BIT 5,B 
BIT 5,C 
BIT 5,D 
BIT 5,E 
BIT 5,H 
BIT 5,L 
BIT 6,(HL) 
BIT 6,(IX+dd) 
BIT 6,(1Y+dd) 
BIT 6,A 
BIT 6,B 
BIT 6,C 
BIT 6,D 
BIT 6,E 
BIT 6,H 
BIT 6,L 
BIT 7,(HL) 
BIT 7,(1X+dd) 
BIT 7,(1Y+dd) 
BIT 7,A 
BIT 7,B 
BIT 7,C 
BIT 7,D 
BIT 7,E 
BIT 7,H 
BIT 7,L 
CALL C,nnnn 
CALL M,nnnn 
CALL NC,nnnn 
CALL  nnnn 
CALL NZ,nnnn 
CALL  P,nnnn 
CALL PE, nnnn 
CALL PO,nnnn 
CALL Z,nnnn 
CCF 
CP (HL) 
CP (IX+dd) 
CP (TY¥+dd) 
CP A 
CP B 
CP C 
CP D 
CP E 
CP H 
CP L 
CP nn 
CPD 
CPDR 
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8080/Z-80 ASSEMBLY LANGUAGE 


Hex 


Al 
Bl 


35dd 
35dd 


2B 
2B 


E3 
E3 


* ee %*¥ He He He KF XK * 


* 


* eH KH 


Mnemonic 
CPI 
CPIR 
CPL 
DAA 
DEC (HL) 
DEC (IX+dd) 
DEC (IY+dd) 
DEC A 
DEC B 
DEC BC 
DEC Cc 
DEC D 
DEC DE 
DEC E 
DEC H 
DEC HL 
DEC IX 
DEC IY 
DEC L 
DEC SP 
DI 
DJNZ dd 
EI 
EX (SP) ,HL 
EX (SP) IX 
EX (SP) IY 
EX AF,AF'’ 
EX DE,HL 
EXX 
HALT 
IM 0 
IM 1 
IM 2 
IN A,(C) 
IN A,(nn) 
IN B,(C) 
IN C,(C) 
IN D,(C) 
IN E,(C) 
IN H,(C) 
IN L,(C) 
INC (HL) 
INC (IX+dd) 
INC (IY+dd) 
INC A 
INC B 
INC BC 
INC C 
INC D 


Hex 


Mnemonic 
* INC DE 
* INC E 
* INC H 
* INC HL 
INC IX 
INC IY 
* INC L 
* INC SP 
IND 
INDR 
INI 
INIR 
* JP (HL) 
JP (IX) 
JP (TY) 
* JP C, nnnn 
* JP M, nnnn 
* JP NC, nnnn 
* JP nnnn 
* JP NZ, nnnn 
* JP P, nnnn 
* JP PE, nnnn 
* JP PO, nnnn 
* JP Z, nnnn 
JR C, dd 
JR dd 
JR NC, dd 
JR NZ, dd 
JR Z, dd 
* LD (BC),A 
* LD (DE),A 
* LD (HL),A 
* LD (HL),B 
* LD (HL),C 
* LD (HL),D 
* LD (HL),E 
* LD (HL),H 
* LD (HL),L 
* LD (HL), nn 
LD (IX+dd),A 
LD (IX+dd),B 
LD (IX+dd),C 
LD (IX+dd),D 
LD (IX+dd),E 
LD (IX+dd),H 
LD (IX+dd),L 
LD (IX+dd), nn 
LD (IY+dd),A 
LD (IY+dd),B 
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FD 71dd LD (TY+dd),C 4B * LD C,E 
FD 72dd LD (I¥+dd),D 4C * LD C,H 
FD 73dd LD (TY+dd),E 4D * LD C,L 
FD 74dd LD (I¥+dd),H OE nn * LD C, nn 
FD 75dd LD (TY+dd),L 56 * LD D,(HL) 
FD 36ddnn LD (TY+dd), nn DD 56dd LD D,(IX+dd) 
32 nnnn * LD (nnnn),A FD 56dd LD D,(1Y+dd) 
ED 43nnnn LD (nnnn),BC 57 * LD D,A 
ED 53nnnn LD (nnnn),DE 50 * LD D,B 
22 nnnn * LD (nnnn),HL 51 * LD D,C 
DD 22nnnn LD (nnnn),IX 52 * LD D,D 
FD 22nnnn LD (nnnn),IY 53 * LD D,E 
ED 73nnnn LD (nnnn),SP 54 * LD D,H 
OA * LD A,(BC) 55 * LD D,L 
1A * LD A,(DE) 16 nn * LD D, nn 
7E * LD A,(HL) ED 5Bnnnn LD DE, (nnnn) 
DD 7Edd LD A,(IX+dd) 11 nnnn * LD DE, nnnn 
FD 7Edd LD A,(IY+dd) 5E * LD E,(HL) 
3A nnnn * LD A, (nnnn) DD 5Edd LD E,(IX+dd) 
TF * LD A,A FD 5Edd LD E,(1Y+dd) 
78 * LD A,B 5F * LD E,A 
79 * LD A,C 58 * LD E,B 
7A * LD A,D 59 * LD E,C 
7B * LD A,E 5A * LD E,D 
7C * LD A,H 5B * LD E,E 
ED 57 LD Ajl 5C * LD E,H 
7D * LD A,L 5D * LD E,L 
38E nn * LD A, nn 1E nn * LD E, nn 
ED 5F LD A,R 66 * LD H,(HL) 
46 * LD B,(HL) DD 66dd LD H,(1X+dd) 
DD 46dd LD B,(IX+dd) FD 66dd LD H,(1Y+dd) 
FD 46dd LD B,([Y+dd) 67 * LD H,A 
47 * LD B,A 60 * LD H,B 
40 * LD B,B 61 * LD H,C 
41 * LD B,C 62 * LD H,D 
42 * LD B,D 63 * LD H,E 
43 * LD B,E 64 * LD H,H 
44 * LD B,H 65 * LD H,L 
45 * LD B,L 26 nn * LD H, nn 
06 nn * LD B, nn 2A nnnn * LD HL, (nnnn) 
ED 4Bnnnn LD BC, (nnnn) 21 nnnn * LD HL, nnnn 
01 nnnn * LD BC, nnnn ED 47 LD I,A 
4E * LD C,(HL) DD 2Annnn LD IX, (nnnn) 
DD 4Edd LD C,(IX+dd) DD 21nnnn LD IX, nnnn 
FD 4Edd LD C,(TY+dd) FD 2Annnn LD TY, (nnnn) 
4F * LD C,A FD 21nnnn LD IY, nnnn 
48 * LD C,B 6E * LD L,(HL) 
49 * LD C,C DD 6Edd LD L,(IX+dd) 
4A * LD C,D FD 6Edd LD L,(TY+dd) 
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8080/Z-80 ASSEMBLY LANGUAGE 


Hex 


7Bnnnn 


F9 
F9 
nnnn 
A8 
B8 
AO 
BO 
44 


Bédd 
Bédd 


E1 
E1 


* * ee Ke Ke Ke 


* 


* ¥ *¥ ¥ He He *® 


* *¥ * * 


Mnemonic 
LD L,A 
LD L,B 
LD L,C 
LD L,D 
LD L,E 
LD L,H 
LD L,L 
LD L, nn 
LD R,A 
LD SP, (nnnn) 
LD SP,HL 
LD SP,IX 
LD SP, IY 
LD SP, nnnn 
LDD 
LDDR 
LDI 
LDIR 
NEG 
NOP 
OR (HL) 
OR (IX+dd) 
OR (IY+dd) 
OR A 
OR B 
OR Cc 
OR D 
OR E 
OR H 
OR L 
OR nn 
OTDR 
OTIR 
OUT (C),A 
OUT  (C),B 
OUT (C),C 
OUT  (C),D 
OUT  (C),E 
OUT  (C),H 
OUT  (C),L 
OUT (nn),A 
OUTD 
OUTI 
POP AF 
POP BC 
POP DE 
POP HL 
POP IX 
POP IY 


Hex 


FD CBdd96 


DD CBddA6 
FD CBddA6 


* * &* 


Mnemonic 
PUSH AF 
PUSH BC 
PUSH DE 
PUSH HL 
PUSH IX 
PUSH IY 
RES 0,(HL) 
RES 0,(IX+dd) 
RES 0,([Y+dd) 
RES 0,A 
RES 0,B 
RES 0,C 
RES 0,D 
RES 0,E 
RES 0,H 
RES 0,L 
RES 1,(HL) 
RES 1,([X+dd) 
RES 1,(1Y+dd) 
RES 1,A 
RES 1,B 
RES 1,C 
RES 1,D 
RES 1,E 
RES 1,H 
RES 1,L 
RES 2,(HL) 
RES 2,(IX+dd) 
RES 2,(1Y+dd) 
RES 2,A 
RES 2,B 
RES 2,C 
RES 2,D 
RES 2,E 
RES 2,H 
RES 2,L 
RES 3,(HL) 
RES 3,(IX+dd) 
RES 3,([Y+dd) 
RES 3,A 
RES 3,B 
RES 3,C 
RES 3,D 
RES 3,E 
RES 3,H 
RES 3,L 
RES 4,(HL) 
RES 4,(IX+dd) 
RES 4,(1Y+dd) 
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FD CBddAE 


FD CBddB6 


FD CBddBE 


* *¥ *¥ ¥ He He HK * 


Mnemonic 
RES 4,A 
RES 4B 
RES 4,C 
RES 4,D 
RES 4,E 
RES 4,H 
RES 4,L 
RES 5,(HL) 
RES 5,(IX+dd) 
RES 5,([Y+dd) 
RES 5,A 
RES 5,B 
RES 5,C 
RES 5,D 
RES 5,E 
RES 5,H 
RES 5,L 
RES 6,(HL) 
RES 6,(IX+dd) 
RES 6,([Y+dd) 
RES 6,A 
RES 6,B 
RES 6,C 
RES 6,D 
RES 6,E 
RES 6,H 
RES 6,L 
RES 7,(HL) 
RES 7,(IX+dd) 
RES 7,(1Y+dd) 
RES 7,A 
RES 7,B 
RES 7,C 
RES 7,D 
RES 7,E 
RES 7H 
RES 7,L 
RET 
RET C 
RET M 
RET NC 
RET NZ 
RET P 
RET PE 
RET PO 
RET Z 
RETI 
RETN 
RL (HL) 


Hex 
CBdd16 


06 


OE 


e+e & 


Mnemonic 
RL (IX+dd) 
RL (IY+dd) 
RL A 
RL B 
RL C 
RL D 
RL E 
RL H 
RL L 
RLA 
RLC (HL) 
RLC (IX+dd) 
RLC (IY+dd) 
RLC A 
RLC B 
RLC C 
RLC D 
RLC E 
RLC H 
RLC L 
RLCA 
RLD 
RR (HL) 
RR (IX+dd) 
RR (IY+dd) 
RR A 
RR B 
RR C 
RR D 
RR E 
RR H 
RR L 
RRA 
RRC (HL) 
RRC (IX+dd) 
RRC (TY+dd) 
RRC A 
RRC B 
RRC C 
RRC D 
RRC E 
RRC H 
RRC L 
RRCA 
RRD 
RST 0 
RST 8 
RST 10H 
RST 18H 
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Hex 


C6 


CBddCE 


* *¥ * % * 


** ¥ HH Ke HE 


Mnemonic 
RST 20H 
RST 28H 
RST 30H 
RST 38H 
SBC A,(HL) 
SBC A,(IX+dd) 
SBC A,(TY+dd) 
SBC A,A 
SBC A,B 
SBC A,C 
SBC A,D 
SBC A,E 
SBC A,H 
SBC A,L 
SBC A, nn 
SBC HL,BC 
SBC HL,DE 
SBC HL,HL 
SBC HL,SP 
SCF 
SET 0,(HL) 
SET 0,([X+dd) 
SET 0,(1Y+dd) 
SET 0,A 
SET 0,B 
SET 0,C 
SET 0,D 
SET 0,E 
SET 0,H 
SET 0,L 
SET 1,(HL) 
SET 1,([X+dd) 
SET 1,(1TY+dd) 
SET 1,A 
SET 1,B 
SET 1,C 
SET 1,D 
SET 1,E 
SET 1,H 
SET 1,L 
SET 2,(HL) 
SET 2,([X+dd) 
SET 2,(1Y+dd) 
SET 2,A 
SET 2,B 
SET 2,C 
SET 2,D 
SET 2,E 
SET 2,H 


CBddE6 


Mnemonic 


2,L 
3,(HL) 
3,(IX+dd) 
3,(IY+dd) 
3,A 


4,(IX+dd) 


5,(IX+dd) 
5,(IY+dd) 
5,A 


6,(IX+dd) 


7,(IX+dd) 


Mnemonic 
SET 7,H 
SET 7,L 
SLA (HL) 


D6 nn 


DD AEdd 
FD AEdd 


* %*¥ *¥ *¥ *¥ * HF * 


* *¥ *¥ *¥ eH KF 
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Mnemonic 
SRL C 
SRL D 
SRL E 
SRL H 
SRL L 
SUB (HL) 


XOR A 
XOR_ B 
XOR C 
XOR OD 
XOR_ E 
XOR 4H 
XOR L 
XOR- nn 


APPENDIX F 


The Z-80 Instruction Set 
(Numeric) 


The Zilog Z-80 instruction set is listed numerically with the corresponding 
hexadecimal values. The following representations apply. 


nn 8-bit argument 


nnnn = 16-bit argument 


dd 8-bit signed displacement 


* instructions common to the 8080 

Hex Mnemonic Hex Mnemonic 
00 * NOP 1C * INC E 
01 nnnn * LD BC, nnnn 1D * DEC E 
02 * LD (BC),A 1E nn * LD EK, nn 
03 * INC BC 1F * RRA 
04 * INC B 20 dd JR NZ, dd 
05 * DEC B 21 nnnn * LD HL, nnnn 
06 nn * LD B, nn 22 nnnn * LD (nnnn),HL 
07 * RLCA 23 * INC HL 
08 EX AF,AF'’ 24 * INC H 
09 * ADD HL,BC 25 * DEC H 
OA * LD A,(BC) 26 nn * LD H, nn 
OB * DEC BC 27 * DAA 
0c * INC C 28 dd JR Z, dd 
oD * DEC Cc 29 * ADD  HL,HL 
OE nn * LD C,nn 2A nnnn * LD HL, (nnnn) 
OF * RRCA 2B * DEC HL 
10 dd DJNZ dd 2C * INC L 
11 nnnn * LD DE, nnnn 2D * DEC L 
12 * LD (DE),A 2E nn * LD L, nn 
13 * INC DE 2F * CPL 
14 * INC D 30 dd JR NC, dd 
15 * DEC D 31 nnnn * LD SP, nnnn 
16 nn * LD D, nn 32 nnnn * LD (nnnn),A 
17 * RLA 33 * INC SP 
18 dd JR dd 34 * INC (HL) 
19 * ADD  HL,DE 35 * DEC (HL) 
1A * LD A,(DE) 36 nn * LD (HL), nn 
1B * DEC DE 37 * SCF 


* ee He He HHH He HEHEHE HE HHH HH HHH Kee H HK HK HEH KH HEH KEK Ke HH KKK Ke KE HK 


Mnemonic 
JR C, dd 
ADD HL,SP 
LD A, (nnnn) 
DEC SP 
INC A 
DEC A 
LD A,nn 
CCF 
LD B,B 
LD B,C 
LD B,D 
LD B,E 
LD B,H 
LD B,L 
LD B,(HL) 
LD B,A 
LD C,B 
LD C,C 
LD C,D 
LD C,E 
LD C,H 
LD C,L 
LD C,(HL) 
LD C,A 
LD D,B 
LD D,C 
LD D,D 
LD D,E 
LD D,H 
LD D,L 
LD D,(HL) 
LD D,A 
LD E,B 
LD E,C 
LD E,D 
LD E,E 
LD E,H 
LD E,L 
LD E,(HL) 
LD E,A 
LD H,B 
LD H,C 
LD H,D 
LD H,E 
LD H,H 
LD H,L 
LD H,(HL) 
LD A 
LD L,B 


Hex 


eeeee eee He Hee He He He HEHE He HHH EH HEHEHE EH HEHEHE HEHEHE KEE HHH HEHEHE HEH HH He 
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Mnemonic 
LD L,C 
LD L,D 
LD L,E 
LD L,H 
LD L,L 
LD L,(HL) 
LD L,A 
LD (HL),B 
LD (HL),C 
LD (HL),D 
LD (HL),E 
LD (HL),H 
LD (HL),L 
HALT 
LD (HL),A 
LD A,B 
LD A,C 
LD A,D 
LD A,E 
LD A,H 
LD A,L 
LD A,(HL) 
LD A,A 
ADD A,B 
ADD A,C 
ADD A,D 
ADD A,E 
ADD A,H 
ADD A,L 
ADD A,(HL) 
ADD A,A 
ADC A,B 
ADC A,C 
ADC A,D 
ADC A,E 
ADC A,H 
ADC A,L 
ADC A,(HL) 
ADC A,A 
SUB B 
SUB C 
SUB D 
SUB E 
SUB H 
SUB L 
SUB (HL) 
SUB A 
SBC A,B 
SBC A,C 
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Hex Mnemonic Hex Mnemonic 
9A * SBC A,D CB 00 RLC B 
9B * SBC A,E CB O01 RLC C 
9C * SBC A,H CB 02 RLC D 
9D * SBC A,L CB 03 RLC E 
9E * SBC A,(HL) CB 04 RLC H 
oF * SBC A,A CB 05 RLC L 
AO * AND B CB 06 RLC (HL) 
Al * AND C CB 07 RLC A 
A2 * AND OD CB 08 RRC B 
A38 * AND E CB 09 RRC C 
A4 * AND 4H CB OA RRC D 
A5 * AND L CB OB RRC E 
A6 * AND (HL) CB OC RRC H 
AT * AND A CB OD RRC L 
A8 * XOR B CB OE RRC (HL) 
AY * XOR C CB OF RRC A 
AA * XOR OD CB 10 RL B 
AB * XOR E CB 11 RL C 
AC * XOR 4H CB 12 RL D 
AD * XOR L CB 13 RL E 
AE * XOR (HL) CB 14 RL H 
AF * XOR A CB 15 RL L 
BO * OR B CB 16 RL (HL) 
Bl * OR C CB 17 RL A 
B2 * OR D CB 18 RR B 
B3 * OR E CB 19 RR C 
B4 * OR H CB 1A RR D 
BD5 * OR L CB 1B RR E 
B6 * OR (HL) CB 1C RR H 
B7 * OR A CB 1D RR L 
B8 * CP B CB 1E RR (HL) 
B9 * CP C CB 1F RR A 
BA * CP D CB 20 SLA B 
BB * CP E CB 21 SLA C 
BC * CP H CB 22 SLA D 
BD * CP L CB 23 SLA E 
BE * CP (HL) CB 24 SLA H 
BF * CP A CB 25 SLA L 
Co * RET NZ CB 26 SLA (HL) 
Cl * POP BC CB 27 SLA A 
C2 nnnn * JP NZ, nnnn CB 28 SRA B 
C3 nnnn * JP nnnn CB 29 SRA C 
C4 nnnn * CALL NZ, nnnn CB 2A SRA D 
C5 * PUSH BC CB 2B SRA E 
C6 nn * ADD A,nn CB 2C SRA H 
C7 * RST 0 CB 2D SRA L 
C8 * RET Z CB 2E SRA (HL) 
C9 * RET CB 2F SRA A 
CA nnnn * JP Z, nnnn CB 38 SRL B 
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Hex Mnemonic Hex Mnemonic 
CB 39 SRL C CB 6A BIT 5,D 
CB 3A SRL D CB 6B BIT 5,E 
CB 3B SRL E CB 6C BIT 5,H 
CB 3C SRL H CB 6D BIT 5,L 
CB 3D SRL L CB 6E BIT 5,(HL) 
CB 3E SRL (HL) CB 6F BIT 5,A 
CB 3F SRL A CB 70 BIT 6,B 
CB 40 BIT 0,B CB 71 BIT 6,C 
CB 41 BIT 0,C CB 72 BIT 6,D 
CB 42 BIT 0,D CB 73 BIT 6,E 
CB 43 BIT 0,E CB 74 BIT 6,H 
CB 44 BIT 0,H CB 75 BIT 6,L 
CB 45 BIT OL CB 76 BIT 6,(HL) 
CB 46 BIT 0,(HL) CB 77 BIT 6,A 
CB 47 BIT 0,A CB 78 BIT 7,B 
CB 48 BIT 1,B CB 79 BIT 7,C 
CB 49 BIT 1,C CB 7A BIT 7,D 
CB 4A BIT 1,D CB 7B BIT 7,E 
CB 4B BIT 1,E CB 7C BIT 7,H 
CB 4C BIT 1,H CB 7D BIT 7,L 
CB 4D BIT 1,L CB 7E BIT 7,(HL) 
CB 4E BIT 1,(HL) CB 7F BIT TA 
CB 4F BIT 1,A CB 80 RES 0,B 
CB 50 BIT 2,B CB 81 RES 0,C 
CB 51 BIT 2,C CB 82 RES 0,D 
CB 52 BIT 2,D CB 83 RES 0,E 
CB 53 BIT 2,E CB 84 RES 0,H 
CB 54 BIT 2,H CB 85 RES 0,L 
CB 55 BIT 2,L CB 86 RES 0,(HL) 
CB 56 BIT 2,(HL) CB 87 RES 0,A 
CB 57 BIT 2,A CB 88 RES 1,B 
CB 58 BIT 3,B CB 89 RES 1,C 
CB 59 BIT 3,C CB 8A RES 1,D 
CB 5A BIT 3,D CB 8B RES 1,E 
CB 5B BIT 3,E CB 8C RES 1,H 
CB 5C BIT 3,H CB 8D RES 1,L 
CB 5D BIT 3,L CB 8E RES 1,(HL) 
CB 5E BIT 3,(HL) CB 8F RES 1,A 
CB 5F BIT 3,A CB 90 RES 2,B 
CB 60 BIT 4,B CB 91 RES 2,C 
CB 61 BIT 4,C CB 92 RES 2,D 
CB 62 BIT 4,D CB 93 RES 2,E 
CB 63 BIT 4,E CB 94 RES 2,H 
CB 64 BIT 4,H CB 95 RES 2,L 
CB 65 BIT 4,L CB 96 RES 2,(HL) 
CB 66 BIT 4,(HL) CB 97 RES 2,A 
CB 67 BIT 4,A CB 98 RES 3,B 
CB 68 BIT 5,B CB 99 RES 3,C 
CB 69 BIT 5,C CB 9A RES 3,D 
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Hex Mnemonic Hex Mnemonic 
CB 9B RES 3,E CB CC SET 1,H 
CB 9C RES 3,H CB CD SET 1,L 
CB 9D RES 3,L CB CE SET 1,(HL) 
CB 9E RES 3,(HL) CB CF SET 1,A 
CB 9F RES 3,A CB DO SET 2,B 
CB AO RES 4,B CB D1 SET 2,C 
CB Al RES 4,C CB D2 SET 2,D 
CB A2 RES 4,D CB D3 SET 2,E 
CB A3 RES 4,E CB D4 SET 2,H 
CB A4 RES 4,H CB D5 SET 2,L 
CB A5 RES 4,L CB D6 SET 2,(HL) 
CB A6 RES 4,(HL) CB D7 SET 2,A 
CB A7 RES 4,A CB D8 SET 3,B 
CB A8 RES 5,B CB D9 SET 3,C 
CB AY RES 5,C CB DA SET 3,D 
CB AA RES 5,D CB DB SET 3,E 
CB AB RES 5,E CB DC SET 3,H 
CB AC RES 5,H CB DD SET 3,L 
CB AD RES 5,L CB DE SET 3,(HL) 
CB AE RES 5,(HL) CB DF SET 3,A 
CB AF RES 5,A CB EO SET 4,B 
CB BO RES 6,B CB El SET 4,C 
CB Bl RES 6,C CB E2 SET 4,D 
CB B2 RES 6,D CB E38 SET 4,E 
CB B3 RES 6,E CB E4 SET 4,H 
CB B4 RES 6,H CB E5 SET 4,L 
CB B5 RES 6,L CB E6 SET 4,(HL) 
CB B6 RES 6,(HL) CB E7 SET 4,A 
CB B7 RES 6,A CB E8 SET 5,B 
CB B8 RES 7,B CB E9 SET 5,C 
CB BY RES 7,C CB EA SET 5,D 
CB BA RES 7,D CB EB SET 5,E 
CB BB RES 7,E CB EC SET 5,H 
CB BC RES 7,H CB ED SET 5,L 
CB BD RES 7,L CB EE SET 5,(HL) 
CB BE RES 7,(HL) CB EF SET 5,A 
CB BF RES T,A CB FO SET 6,B 
CB CO SET 0,B CB F1 SET 6,C 
CB Cl SET 0,C CB F2 SET 6,D 
CB C2 SET 0,D CB F3 SET 6,E 
CB C3 SET 0,E CB F4 SET 6,H 
CB C4 SET 0,H CB F5 SET 6,L 
CB C5 SET 0,L CB F6 SET 6,(HL) 
CB C6 SET 0,(HL) CB F7 SET 6,A 
CB C7 SET . CB F8 SET 7,B 
CB C8 SET 1,B CB F9 SET 7,C 
CB C9 SET 1,C CB FA SET 7,D 
CB CA SET 1,D CB FB SET 7,E 


Hex 
CB FD 


CC nnnn 
CD nnnn 


D2 nnnn 


D4 nnnn 


DD 96dd 


* * * * *¥ *¥ ee He He KR 


* * 


Mnemonic 
SET 7,L 
SET 7,(HL) 
SET 7,A 
CALL Z,nnnn 
CALL nnnn 
ADC A,nn 
RST 8 
RET NC 
POP DE 
JP NC, nnnn 
OUT (nn),A 
CALL NC, nnnn 
PUSH DE 
SUB nn 
RST 10H 
RET C 
EXX 
JP C, nnnn 
IN A, (nn) 
CALL C,nnnn 
ADD _ IX,BC 
ADD IX,DE 
LD IX, nnnn 
LD (nnnn),IX 
INC IX 
ADD  IX,IxX 
LD IX, (nnnn) 
DEC Ix 
INC (IX+dd) 
DEC (IX+dd) 
LD (IX+dd), nn 
ADD _ IX,SP 
LD B,(IX+dd) 
LD C,(IX+dd) 
LD D,(IX+dd) 
LD E,(IX+dd) 
LD H,(IX+dd) 
LD L,(IX+dd) 
LD (IX+dd),B 
LD (IX+dd),C 
LD (IX+dd),D 
LD (IX+dd),E 
LD (IX+dd),H 
LD (IX+dd),L 
LD (IX+dd),A 
LD A,(IX+dd) 
ADD A,(IX+dd) 
ADC A,(IX+dd) 
SUB (IX+dd) 
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Hex Mnemonic 
DD 9Edd SBC A,(TX+dd) 
DD A6dd AND (IX+dd) 
DD AEdd XOR_ (IX+dd) 
DD Bédd OR (IX+dd) 
DD BEdd CP (IX+dd) 
DD CBdd06 RLC (IX+dd) 
DD CBdd0E RRC (IX+dd) 
DD CBdd16 RL (IX+dd) 
DD CBdd1E RR (IX+dd) 
DD CBdd26 SLA (IX+dd) 
DD CBdd2E SRA (IX+dd) 
DD CBdd3E SRL (IX+dd) 
DD CBdd46 BIT 0,([X+dd) 
DD CBdd4E BIT 1,([X+dd) 
DD CBdd56 BIT 2,([X+dd) 
DD CBdd5E BIT 3,(IX+dd) 
DD CBdd66 BIT 4,([X+da) 
DD CBdd6E BIT 5,(IX+dd) 
DD CBdd76 BIT 6,(IX+dd) 
DD CBdd7E BIT 7,(1X+dd) 
DD CBdd8&6 RES 0,(IX+dd) 
DD CBdd8E RES 1,([X+dd) 
DD CBdd96 RES 2,(IX+dd) 
DD CBdd9E RES 3,(IX+dd) 
DD CBddA6 RES 4,([X+dd) 
DD CBddAE RES 5,([X+dd) 
DD CBddB6 RES 6,(IX+dd) 
DD CBddBE RES 7,(1X+dd) 
DD CBddC6 SET 0,(IX+dd) 
DD CBddCE SET 1,(1X+dd) 
DD CBddD6 SET 2,(1X+dd) 
DD CBddDE SET 3,(IX+dd) 
DD CBddE6 SET 4,(IX+dd) 
DD CBddEE SET 5,(IX+dd) 
DD CBddF6 SET 6,([X+dd) 
DD CBddFE SET 7,([X+dd) 
DD E1 POP IX 
DD E53 EX (SP), IX 
DD E5 PUSH IX 
DD E9 JP (IX) 
DD F9 LD SP,IX 
DE nn * SBC A,nn 
DF * RST 18H 
EO * RET PO 
El * POP HL 
E2 nnnn * JP PO, nnnn 
E3 * EX (SP),HL 
E4 nnnn * CALL PO,nnnn 
E5 * PUSH HL 
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Hex Mnemonic Hex Mnemonic 
E6 nn * AND nn ED A2 INI 
E7 * RST 20H ED A3 OUTI 
E8 * RET PE ED A8 LDD 
E9 * JP (HL) ED AQ CPD 
EA nnnn * JP PE, nnnn ED AA IND 
EB * EX DE,HL ED AB OUTD 
EC nnnn * CALL PE, nnnn ED BO LDIR 
ED 40 IN B,(C) ED Bl CPIR 
ED 41 OUT (C),B ED B2 INIR 
ED 42 SBC HL,BC ED B3 OTIR 
ED 43nnnn LD (nnnn),BC ED B8 LDDR 
ED 44 NEG ED B9 CPDR 
ED 45 RETN ED BA INDR 
ED 46 IM 0 ED BB OTDR 
ED 47 LD LA EE nn * XOR N 
ED 48 IN C,(C) EF * RST 28H 
ED 49 OUT  (C),C FO * RET P 
ED 4A ADC HL,BC Fl * POP AF 
ED 4Bnnnn LD BC, (nnnn) F2 nnnn * JP P, nnnn 
ED 4D RETI F3 * DI 
ED 4F LD R,A F4 nnnn * CALL P,nnnn 
ED 50 IN D,(C) F5 * PUSH AF 
ED 51 OUT (C),D F6 nn * OR nn 
ED 52 SBC HL,DE F7 * RST 30H 
ED 53nnnn LD (nnnn),DE F8 * RET M 
ED 56 IM 1 F9 * LD SP,HL 
ED 57 LD A,l FA nnnn * JP M, nnnn 
ED 58 IN E,(C) FB * EI 
ED 59 OUT (C),E FC nnnn * CALL M,nnnn 
ED 5A ADC HL,DE FD 09 ADD _ IY,BC 
ED 5Bnnnn LD DE, (nnnn) FD 19 ADD _ IY,DE 
ED 5E IM 2 FD 21nnnn LD TY, nnnn 
ED 5F LD A,R FD 22nnnn LD (nnnn), TY 
ED 60 IN H,(C) FD 23 INC IY 
ED 61 OUT  (C),H FD 29 ADD _IY,IY 
ED 62 SBC HL,HL FD 2Annnn LD IY, (nnnn) 
ED 67 RRD FD 2B DEC IY 
ED 68 IN L,(C) FD 34dd INC (IY+dd) 
ED 69 OUT (C),L FD 35dd DEC (IY+dd) 
ED 6A ADC HL,HL FD 36ddnn LD (TY+dd), nn 
ED 6F RLD FD 39 ADD _ IY,SP 
ED 72 SBC HL,SP FD 46dd LD B,([Y+dd) 
ED 73nnnn LD (nnnn),SP FD 4Edd LD C,(1Y+dd) 
ED 78 IN A,(C) FD 56dd LD D,(IY+dd) 
ED 79 OUT (C),A FD 5Edd LD E,([Y+dd) 
ED 7A ADC HL,SP FD 66dd LD H,(1Y+dd) 
ED 7Bnnnn LD SP, (nnnn) FD 6Edd LD L,(ITY+dd) 
ED AO LDI FD 70dd LD (IY+dd),B 


ED Al CPI FD 71dd LD (TY¥+dd),C 


Hex 


72dd 
73dd 
74dd 
75dd 
T7dd 
7Edd 
86dd 
8Edd 
96dd 
9Edd 
A6dd 
AEdd 
B6dd 
BEdd 
CBdd06 
CBdd0E 
CBdd16 
CBdd1E 
CBdd26 
CBdd2E 
CBdd3E 
CBdd46 
CBdd4E 
CBdd56 
CBdd5E 
CBdd6é6 


Mnemonic 

LD (ITY¥+dd),D 
LD (IY+dd),E 
LD (I¥+dd),H 
LD (TY+dd),L 
LD (T¥+dd),A 
LD A,(TY+dd) 
ADD A,(TY+dd) 
ADC A,(TY+dd) 
SUB (IY+dd) 
SBC A,(TY+dd) 
AND (IY+dd) 
XOR  (IY+dd) 
OR (TY+dd) 
CP (I¥+dd) 
RLC (IY+dd) 
RRC (I¥+dd) 
RL (I¥+dd) 
RR (I¥+dd) 
SLA (I¥+dd) 
SRA (I¥+dd) 
SRL (IY+dd) 
BIT 0,([Y+dd) 
BIT 1,(1Y+dd) 
BIT 2,(1Y+dd) 
BIT 3,([Y+dd) 
BIT 4,(1Y+dqd) 


Hex 


CBdd6E 
CBdd76 
CBdd7E 
CBdd86 
CBdd8E 
CBdd96 
CBdd9E 
CBddA6 
CBddAE 
CBddB6 
CBddBE 
CBddC6 
CBddCE 
CBddD6 
CBddDE 
CBddE6 
CBddEE 
CBddF6 
CBddFE 
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APPENDIX F 
Mnemonic 
BIT 5,(1Y+dd) 
BIT 6,([Y+dd) 
BIT 7,(1Y+dd) 
RES 0,(TY+dd) 
RES 1,(1Y+dd) 
RES 2,(1Y+dd) 
RES 3,(TY+dd) 
RES 4,(1¥Y+dd) 
RES 5,([Y+dd) 
RES 6,([Y+dd) 
RES 7,(1Y+dd) 
SET 0,([Y+dd) 
SET 1,(1Y+dd) 
SET 2,(1Y+dd) 
SET 3,(1Y+dd) 
SET 4,(1Y+dd) 
SET 5,(1Y+dd) 
SET 6,([Y+dd) 
SET 7,(1Y+dd) 
POP IY 
EX (SP), IY 
PUSH IY 
JP (IY) 
LD SP, IY 

* CP nn 
* RST 38H 


8 


APPENDIX G 


Cross-Reference of 
O80 and Z-80 Instructions 


The instructions are listed in alphabetic order according to the 8080 
mnemonic. The following representations are used. 


N 8-bit constant 

NN 16-bit constant 

R single register 

RR_ double register 

= range of values expressed as one character 

—-— _ range of values expressed as two characters 

8080 HEX Z-80 
code code code 

ACI N CE ADC A,N 
ADC M 8E ADC A,(HL) 
ADC R 8— ADC A,R 
ADD M 86 ADD A,(HL) 
ADD R 8— ADD A,R 
ADI N C6 ADD A,N 
ANA M AG AND (HL) 
ANA R A- AND R 
ANI N E6 AND N 
CALL NN CD CALL NN 
CC NN DC CALL C,NN 
CM NN FC CALL M,NN 
CMA 2F CPL 
CMC 3F CCF 
CMP M BE cP (HL) 
CMP R B- CP R 
CNC NN D4 CALL NC,NN 
CNZ NN C4 CALL NZ,NN 
CP NN F4 CALL P,NN 
CPE NN EC CALL PE,NN 
CPI N FE CP N 
CPO NN E4 CALL PO,NN 
CZ NN CC CALL Z,NN 
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8080 

code 
DAA 
DAD B 
DAD D 
DAD H 
DAD SP 
DCR M 
DCR R 
DCX B 
DCX D 
DCX H 
DCX SP 
DI 
EI 
HLT 
IN N 
INR M 
INR R 
INX B 
INX D 
INX H 
INX SP 
JC NN 
JM NN 
JMP NN 
JNC NN 
INZ NN 
JP NN 
JPE NN 
JPO NN 
JZ NN 
LDA NN 
LDAX B 
LDAX D 
LHLD NN 
LXI B,NN 
LXI D,NN 
LXI H,NN 
LXI SP,NN 
MOV M,R 
MOV RM 
MOV R,R2 
MVI M,N 
MVI R,N 
NOP 
ORA M 
ORA R 
ORI N 
OUT N 
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8080 
code 


PCHL 
POP 


aa aaa 


= 


ZADeZ ABDNIARWNHRO 
Z 


Zz 


2095 2G OZ 


(SP) ,HL 


APPENDIX H 


Details of the Z-80 
and 8080 Instruction Set 


A summary of the Z-80 and 8080 instruction set is given in this appendix.* 
The instructions are listed alphabetically by the official Zilog mnemonic. If 
there is a corresponding 8080 instruction, the Intel mnemonic is shown in 
angle brackets; if not, ‘no 8080” is shown in the angle brackets. The Z-80 
mnemonics are listed in numeric order in Appendix F. The Z-80 equivalent 
of an 8080 mnemonic can be found from the cross-reference given in 
Appendix G. 

The letters A, B, C, D, E, H, I, L, IX, IY, R, and SP are used for the 
standard Z-80 register names. In addition, the symbols BC, DE, and HL are 
used for the register pairs. The following symbols are used for general 
arguments. 


r,r2  8-bit CPU register 

dd 8-bit signed displacement 
nn general 8-bit constant 
nnnn_= 16-bit constant 


The flag bits are represented by: 


C carry 

H half carry 

N add/subtract 
P/O parity/overflow 
s sign 

Z zero 


Pointers to memory or input or output addresses are enclosed in parentheses. 


*More details can be obtained from the Zilog programmer’s manual, Z-80 Assembly 
Language Programming Manual, Zilog, Inc., 1977. 
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ADC Avy(HL) <ADC M> 


Add the memory byte pointed to by the HL register pair to the accumulator 
and the carry flag. The result is placed in the accumulator. 


Flags affected: C, H, O, S, Z 
Flag reset: N 


ADC A» (IXtdd) <no 8080> 
ADC As (1Y¥+dd) <no 8080> 


Add the memory byte referenced by the sum of the specified index register 
and the displacement to the accumulator and the carry flag. The result is 
placed in the accumulator. 


Flags affected: C, H, O, S, Z 
Flag reset: N 


ABC Avr <ADC r> 


Add the value in register r to the accumulator and the carry flag. The result 
is placed in the accumulator. 


Flags affected: C, H, O, S, Z, 
Flags reset: N 


ADC Asnn <ACI nn> 


Add the constant given in the second operand to the accumulator and the 
carry flag. The result is placed in the accumulator. 


Flags affected: C, H, O, S, Z 
Flag reset: N 


Apc HL » BC <no 8080> 
ADC HL» DE <no 8080> 
ADC HL » HL <no 8080> 
ADC HL» SF <no 8080> 


Add the indicated double register to the HL register and the carry flag. The 
result is placed in HL. 


Flags affected: C, H, O, S, Z, 
Flag reset: N 


ADD A» (HL) <ADD M> 


Add the memory byte pointed to by the HL pair to the accumulator. The 
result is placed in the accumulator. 


Flags affected: C, H, O, S, Z 
Flag reset: N 
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ADL Avy (IXtdd) <no 8080> 
ADD Ar(IYtdd) <no 8080> 


Add the memory byte pointed to by the sum of the specified index register 
and the displacement to the accumulator. The result is placed in the accumu- 
lator. 


Flags affected: C, H, O, S, Z 
Flag reset: N 


ADD Arr <ADD T> 


Add the value in register r to the accumulator. The result is placed in the 
accumulator. 


Flags affected: C,H, O, S, Z 
Flag reset: N 


ADD Arnn <ADI nn> 


Add the immediate byte (the second operand) to the accumulator. The 
result is placed in A. 


Plags affected: C,H, O,S, Z 
Flag reset: N 


ADD HL » BC <DAD B> 
ADD HL » DE <DAD [i> 
ADD HL » HL <DAD H> 
ADD HL» SP <DAD SP> 


Add the specified double register to the HL pair. The result is placed in HL. 
This is a double-precision addition. The carry flag is set if an overflow 
occurs. The instruction ADD HL,HL performs a 16-bit arithmetic shift left, 
effectively doubling the value in HL. The ADD HL,SP instruction can be 
used with the 8080 CPU to save an incoming stack pointer: 


LXI H,0 
DAD SP 
SHLD nnnn 


Flags affected: C,H, O, S, Z 
Flag reset: N 


ADD IX*BC <no 8080> 
ADD IX»DE <no 8000> 
ADD IX*IX <no 8080> 
ADD IX»SP <no 8080> 
ADD TY*BC <no 8080> 
ADD IY*DE <no 8080> 
ADD IY*IY <no 8080> 


ADD IY¥*SP <no 8080> 
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Add the indicated double register to the specified index register. The result 
is placed in the index register. The HL register pair does not participate in 
this group of instructions. Notice that there is no equivalent series of ADC 
instructions. 


Flags affected: C,O,S, Z 
Flag reset: N 


AND (HL) <ANA M> 


Perform a logical AND with the accumulator and the memory location 
pointed to by the HL register pair. The result is placed in the accumulator. 


Flags affected: P,S, Z 
Flags reset: C, N 


Flag set: H 
AND (IX+dd) <no 8080> 
AND (1Y¥t+dd) <no 8080> 


Perform a logical ‘AND with the accumulator and the memory byte refer- 
enced by the sum of the index register and displacement. The result is 
placed in the accumulator. 


Flags affected: P,S, Z 
Flags reset: C,N 
Flag set: H 


AND r <ANA r> 


Perform a logical AND with the accumulator and register r. The result is 
placed in the accumulator. An instruction AND A is an effective way to test 
the parity, sign, and zero flags. 


Flags affected: P,S, Z 
Flags reset: C, N 
Flag set: H 


AND nn <ANI an 


Perform a logical AND with the accumulator and the constant given in the 
argument. The result is placed in the accumulator. This instruction can be 
used to selectively reset bits of the accumulator. For example, the instruc- 
tion AND 7FH will reset bit 7. 


Flags affected: P,S, Z 
Flags reset: C, N 
Flag set: H 
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BIT bs (HL) <no 8080> 
BIT by (IXt+dd) =no 8080> 
BIT be (1Y+dd) <no 8080> 


Test bit b of the memory byte referenced by the second operand. Bit b can 
range from zero through 7. The zero flag is set if the referenced bit is a 
logical 1; otherwise, it is reset. Thus, the zero flag becomes the complement 
of the selected bit. 


Flag affected: Z 
Flag set: H 
Flag reset: N 


BIT ber <no 8080> 


Test bit b of register r, where b can range from zero through 7. The zero flag 
is set if the referenced bit is a logical 1. It is reset otherwise. 


Flag affected: Z 
Flag set: H 
Flag reset: N 


CALL nanrr <CALL nnnan> 


Unconditional subroutine call to address nnnn. The address of the following 
instruction is pushed onto the stack. 


Flags affected: none 


CALL Cynnnn <cc nannn> 
CALL Mennnn <CM nnann> 
CALL NC ennnn <CNC nonn> 
CALL NZ ennnn <CNZ nnn 
CALL Pennnn <CP nnn 
CALL PE snnnn CPE nnnn> 
CALL POsnnnn <CFO nnn 
CALL Zesnnnn <CZ anne 


Conditional subroutine call to address nnnn. The address of the following 
instruction is pushed onto the stack. The conditions are: 


C carry flag set (carry) 

M sign flag set (minus) 
NC carry flag reset (not carry) 
NZ _ zero flag reset (not zero) 


P sign flag reset (plus) 
PE parity flag set (parity even) 
PO parity flag reset (parity odd) 
Z zero flag set (zero) 
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CCF < CMC > 


Complement the carry flag. This instruction can be given after a SCF com- 
mand to reset the carry flag. 


Flag affected: C 
Flag reset: N 


cP CHL) <CMP M> 


Compare the byte in memory pointed to by the HL pair to the accumulator 
(an implied operand). The zero flag is set if the accumulator is equal to the 
operand. The carry flag is set if the accumulator is smaller than the operand. 


Flags affected: C, H, O,S, Z 


Flag set: N 
CF (IX+dd) <no 8080> 
CP (1Y¥+dd) <no 8080> 


Compare the memory location referenced by the sum of the index register 
and displacement to the accumulator which is an implied operand. The zero 
flag is set if the accumulator is equal to the operand. The carry flag is set if 
the accumulator is smaller than the operand. 


Flags affected: C, H, O, S, Z 
Flag set: N 


CF r <CMP T> 


Compare register r to the accumulator, which is an implied operand. The 
zero flag is set if the accumulator is equal to the operand. The carry flag is 
set if the accumulator is smaller than the operand. 


Flags affected: C, H, O, S, Z 
Flag set: N 


CP nn <CPI nn> 


Compare the constant given in the operand to the accumulator, which is an 
implied operand. The zero flag is set if the accumulator is equal to the 
operand. The carry flag is set if the accumulator is smaller than the operand. 


Flags affected: C, H, O, S, Z 


Flag set: N 

CFO <no 8080> 
CPDR <no 8080> 
CFI <no 8080> 


CPIR <no 8080> 
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Compare the memory byte pointed to by HL to the accumulator. Decrement 
HL (if D) or increment HL (if I). Decrement the byte count in the BC regis- 
ter. Repeat the operation for CPDR and CPIR until a match is found or 
until the BC register pair has been decremented to zero. The zero flag is set 
if a match is found. The parity flag is set if BC is decremented to zero. 


Flags affected: H,S 
Flags set: N, Zif A = (HL), Pif BC = 0 


CPL < CMA > 


Complement the accumulator. This instruction performs a one’s comple- 
ment on the accumulator. (Compare to the instruction NEG.) 


Flags set: H, N 


DAA < DAA > 


Decimal adjust the accumulator. This instruction is used after each addition 
with BCD numbers. The Z-80 performs this operation properly for both 
addition and subtraction. The 8080, however, gives an incorrect result for 
subtraction. 


Flags affected: O,S, Z, C,H 


DEC (HL) <DCR M> 
Decrement the memory byte pointed to by the HL register pair. 


Flags affected: H, O, S, Z 
Flag set: N 
Flag not affected: C 


DEC (IX+dd) <no 8080> 
DEC (1Y¥+dd) =no 8080> 


Decrement the memory byte pointed to by the sum of the index register 
and the displacement. 


Flags affected: H, O,S, Z 


Flag set: N 
Flag not affected: C 


DEC r <DCR re 


Decrement the register r. Don’t try to decrement a register past zero while 
executing a JP NC loop. The carry flag is not affected by this operation. 


Flags affected: H, O, S, Z 
Flag set: N 
Flag not affected: C 
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DEC BC <DCX B> 
DEC DE <DCX D> 
DEC HL <DCX H>> 
DEC SP <DCX SP> 


Decrement the indicated double register. Don’t try to decrement a double 
register to zero in a JP NZ loop. It won’t work since this operation does not 
affect any of the PSW flags. Instead, move one byte of the double register 
into the accumulator and perform a logical OR with the other byte. 


LD A,C 
OR B 
JR NZ,nnnn 
Flags affected: none!!!! 
DEC Ix <no 8080 
DEC IY <no 8080> 


Decrement the index register. 


Flags affected: none 


DI < DI > 


Disable maskable interrupt request. 


BJINZ dd <no 8080> 


Decrement register B and jump relative to displacement dd if B register is 
not zero. 


Flags affected: none 


EI < EI > 


Enable maskable interrupt request. 


EX (SF) » HL < XTHL > 


Exchange the byte at the stack pointer with register L. Exchange the byte at 
the stack pointer + 1 with register H. 


Flags affected: none 
EX (SF) » IX <no 8080> 
EX (SP) slY <no 8080 


Exchange the 16 bits referenced by the stack pointer with the specified 
index register. 


Flags affected: none 
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EX AF 2 AF’ <no 8080> 
Exchange the accumulator and flag register with the alternate set. 
Flags affected: all 


EX DE »HL < XCHG > 
Exchange the double registers DE and HL. 


Flags affected: none 


EXX <no 8080> 
Exchange BC, DE, and HL with the alternate set. 
Flags affected: none 


HALT < HLT > 


Suspend operation of the CPU until a reset or interrupt occurs. Dynamic 
memory refresh continues during a halt. 


IM i) <no 8080> 
IM 1 <no 8080> 
IM 2 <no 8080> 


Sets interrupt mode 0, 1, or 2. Interrupt mode 0 is automatically selected 
when a Z-80 reset occurs. The result is the same as the 8080 interrupt 
response. Interrupt mode 1 performs an RST 38H instruction. Interrupt 
mode 2 provides for many interrupt locations. 


IN ry(C) <no 8080> 
9 
Input a byte from the port address in register C to register r. 


Flags affected: P, S, Z 
Flags reset: H, N 


IN A» (nn) <IN nn> 
Input a byte from the port address nn to the accumulator. 


Flags affected: none 


INC (HL) <INR M> 
Increment the memory byte pointed to by the HL pair. 


Flags affected: H, O, S, Z 
Flag set: N 
Flag not affected. C!!!! 
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INC (IX+dd) <no 8080> 
INC (1Y¥+dd) <no 8080> 


Increment the memory byte pointed to by the sum of the index register and 
the displacement. 


Flags affected: H, O,S, Z 
Flag set: N 
Flag not affected: C!!! 


INC r <INR r> 


Increment the 8-bit register r. Don’t try to increment a register past zero 
while executing a JP NC loop. It won’t work because the carry flag is unaf- 
fected by this instruction. 


Flags affected: H, O, 8, Z 
Flag set: N 
Flag not affected: C!!! 


INC BC <INX B> 
INC DE <INX D> 
INC HL <INX H> 
INC SP <INX SP> 


Increment the specified double register. 


Flags affected: none!!!! 


INC IX <no 8080» 
INC ly <no 8080> 


Increment the specified index register. 


Flags affected: none 


IND <no 8080> 
INDR <no 8080> 
INI ~no 8080> 
INIR <no 8080> 


Input a byte from the port address in register C to the memory byte pointed 
to by HL. Decrement register B. The HL register is incremented (if I) or 
decremented (if D). For INDR and INIR the process is repeated until the 
8-bit register B becomes zero. 


Flag affected: Z (if B = 0) 
Flag set: N 
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JP CHL) < PCHL > 


Copy the HL register pair into the program counter; then retrieve the next 
instruction from the address referenced by HL. This instruction causes a 
jump to the address referenced by HL. 


Flags affected: none 


JP (IX) <no 8080> 
JP (IY) <no 8080> 


Copy the contents of the specified index register into the program counter; 
then retrieve the next instruction from the address referenced by IX or IY. 


Flags affected: none 


JP nanan <JMP nannn> 
Unconditional jump to address nnnn. 


Flags affected: none 


JP Cynnnn <JC nnnn> 
JP Mennnn <JM nnann> 
JF NC ennnn <JNC nnnn> 
JF NZ»nnnn <JINZ nnnn> 
JP P»ynnnn <P nnann> 
JP PE »nnnn < IPE annn> 
JF POsnnnn <JPO nnnn> 
JP Z»nnnn “IZ nann> 


Conditional jump to address nnnn where: 


C means carry flag set (carry) 

M means sign flag set (minus) 

NC means carry flag reset (not carry) 
NZ _ means zero flag reset (not zero) 

P means sign flag reset (plus) 

PE means parity flagset (parity even) 
PO means parity flag reset (parity odd) 
Z means zero flag set (zero) 


JR dd <no 8080> 


Unconditional relative jump with a signed displacement nn. The jump is 
limited to 129 bytes forward and 126 bytes backward in memory. 


Flags affected: none 
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JR Crdd <no 8080> 
JR NC odd <no 8080> 
JR NZ edd <no 8080> 
JR Zedd <no 8080> 


Conditional relative jump to address nn where: 


C means carry flag set (carry) 
NC means carry flag reset (not carry) 
NZ _ means zero flagreset (not zero) 


Z means zero flag set (zero) 
LD (BO) 2A <STAX B> 
Lo (DE) 2A <STAX D> 


Move the byte in the accumulator to the memory byte referenced by the 
specified register pair. 


LD (HL) or <MOV Mor> 


Move the byte in register r to the memory byte pointed to by the HL pair. 


LD CHL) »nn <MVI Menn> 


Move the immediate byte nn into the memory byte referenced by the HL 
pair. 


LD (IXt+dd) yr <no 8080> 
LD (IX+dd) snn <no 8080> 
LD (1Y¥+dd)er <no 8080> 
LD (1Y¥+dd) enn 


Move the byte in register r or the immediate byte nn into the memory byte 
referenced by the sum of the index register plus the displacement. These 
instructions can be used to load relocatable binary code. 


LD (nnann) A <STA nnann> 


Store the accumulator in the memory location referenced by nnnn. 


LD (nannn) » BC <no 8080> 
LD Cnnnn) » DE <no 8080> 


Store the low-order byte (C or E) of the specified double register at the 
memory location nnnn. Store the high-order byte (B or D) at nnnn + 1. 


LD Cannmn) » HL <SHLD nnnn> 


Store register L at the memory address nnnn. Store register H at the address 
nnnn + 1. 
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LD (nnnn) » IX <no 8080> 
LD Cnannds TY | <no 8080> 
LD Cnnnn) » SP <no 8080> 


Store the low-order byte of the specified register IX, IY, or SP at the 
location nnnn. Store the high-order byte at nnnn + 1. The instruction 
LD (nnnn),SP can be used to temporarily save an incoming stack pointer. It 
can later be restored by a LD SP,(nnnn) operation. 


LD Ay (BC) <LDAX B> 
LD A» (DE) <LDAX D> 


Move the memory byte referenced by the specified register pair BC or DE 
into the accumulator. 


LD Arl <no 8080> 


Load the accumulator from the interrupt-vector register. The parity flag 
reflects the state of the interrupt-enable flip-flop. 


Flags affected: S, Z, P 
Flags reset: H, N 


LD ArK <no 8080> 


Load the accumulator from the memory-refresh register. The parity flag 
reflects the state of the interrupt-enable flip-flop. This is an easy way to 
obtain a fairly decent random number. 


Flags affected: S, Z, P 
Flags reset: H, N 


Lit IvA <no 8080> 
Copy the accumulator into the interrupt-vector register. 


Flags affected: none 


LD RrA <no 8080> 
Copy the accumular into memory-refresh register. 


Flags affected: none 


LD ry CHL) <MOV reM> 


Move the byte in the memory location pointed to by the HL register pair 
into register r. 
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LD ry (IXtdd) <no 8080> 
LD ry (IlY¥tdd) <no 8080> 


Move the byte at the memory location referenced by the sum of the index 
register and the displacement into register r. 


LD rer2 <MOV rer2> 


Move the byte from register r2 to r. 


LD rynn <MVI renn> 


Load register r with the 8-bit data byte nn. 


LB Ay (nnnn) <LDA nnann> 


Load the accumulator from the memory byte referenced by the 16-bit 
pointer nnnn. 


LB BC» (nnnn) <no 8080> 
LD DE» (nnnn) <no 8080> 


Load the low-order byte (C or E) from the location referenced by the 16-bit 
pointer nnnn. Load the high-order byte (B or D) from nnnn + 1. 


LD HL » (nnmn) <LHLD nannn> 


Load register L from the address referenced by the 16-bit value nnnn. Load 
register H from the address nnnn + 1. 


Lb BC ynnann <LXI- Bennnn> 
LD DEsnnnn <LXI Dynnnn> 
Lo HL snnnn <LXI Heynnnn> 
LD SP ynnnn <LXI SP»nnnn> 
LD IXsnnnn <no 8080> 
LD TY »snnnn <no 8080> 


Load the specified double register with the 16-bit constant nnnn. Be careful 
not to confuse LD HL,(nnnn) with LD HL,nnnn. 


Lo IX» (nnn) <no 8080> 
LD TY» (nnnn) <no 8080> 
Lo SP» (nnnn)> <no 8080> 


Load the low byte of IX, IY, or SP from the memory location nnnn. Load 
the high byte from nnnn + 1. The LD SP,(nnnn) instruction can be used to 
retrieve a previously saved stack pointer. 
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LB SP rH < SPHL > 
LD SP»IX no 8080> 
LD SP»IY <no B8080> 


Load the stack pointer from the specified 16-bit register. The SPHL instruc- 
tion can be used to retrieve a previously saved stack pointer when the 8080 
CPU is used. 


LHLD nnnn 
SPHL 

LDD <no 8080> 

LDDR <no 8080> 

LDI <no 8080> 

LDIR <no 8080> 


Move the byte referenced by the HL pair into the location pointed to by 
the DE register pair. Decrement the 16-bit byte counter in BC. Increment 
(if I) or decrement (if D) both HL and DE. Repeat the operation for LDDR 
and LDIR until the BC register has been decremented to zero. 


NEG <no 8080> 


This instruction performs a two’s complement on the accumulator. It 
effectively subtracts the accumulator from zero. To perform this task on an 
8080, use a CMA command followed by an INR A command. 


Flags affected: all 


NOP < NOP > 
No operation is performed by the CPU. 


Flags affected: none 


OR (HL) <ORA M> 


Perform a logical OR with the accumulator and the byte referenced by HL. 
The result is placed in the accumulator. 


Flags affected: P,S, Z 
Flags reset: C, H, N 


OR (IX+dd) <no 8080> 
OR (1Ytdd) <no 8080> 


Perform a logical OR with the accumulator and the byte referenced by the 
specified index register plus the displacement. The result is placed in the 
accumulator. 


Flags affected: P, S, Z 
Flags reset: C, H, N 
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OR r <ORA r> 


Perform a logical OR with the accumulator and the register r. The result is 
placed in the accumulator. An instruction of OR A is an efficient way to 
test the parity, sign, and zero flags. 


Flags affected: P,S, Z 
Flags reset: C, H, N 


OR nn <ORI nn> 


Perform a logical OR with the accumulator and the byte nn. The result is 
placed in the accumulator. This instruction can be used to set individual bits 
of the accumulator. For example, OR 20H will set bit 5 to a logical 1. 


Flags affected: P, S, Z 
Flags reset: C,H, N 


OTDR <no 8080> 
OTIR <no 8080> 


Output a byte from the memory location pointed to by the HL pair. The 
port address is contained in register C. Register B is decremented. The HL 
register pair is incremented (if I) or decremented (if D). The process is 
repeated until register B has become zero. 


Flags set: N, Z 


OUT (Coder xno 8080> 
Output the byte in register r to the port address contained in register C. 


Flags affected: none 


OUT (nnd 2A <OUT nn 


Output the byte in the accumulator to the port address nn. 


Flags affected: none 


OUTD <no 8080> 
OUTI <no 8080> 


Output a byte from the memory location pointed to by the HL pair. The 
port address is contained in register C. Register B is decremented. The HL 
register pair is incremented (if I) or decremented (if D). 


Flag affected: Z 
Flag set: N 
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FOP AF <POP PSW> 


Move the byte at the memory location referenced by the stack pointer into 
the flag register (PSW), and increment the stack pointer. Then move the 
byte at the location referenced by the new stack-pointer value into the 
accumulator and increment the stack pointer a second time. 


Flags affected: all 


FOP BC <POP B> 
POF DE <POP n> 
FOP HL <POP H> 


Copy two bytes of memory into the appropriate double register as follows. 
The memory byte referenced by the stack pointer is moved into the low- 
order byte (C, E, or L), then the stack pointer is incremented. The memory 
byte referenced by the new stack pointer is then moved into the high-order 
byte (B, D, or H). The stack pointer is incremented a second time. 


Flags affected: none 


FOP Ix no B8080> 
POP Iy <no 8080> 


Copy the top of the stack into the specified index register. Increment the 
stack pointer twice. 


Flags affected: none 


PUSH AF “PUSH PSW> 


Store the accumulator and flag register in memory as follows. The stack 
pointer is decremented, then the value in the accumulator is moved to the 
memory byte referenced by the stack pointer. The stack pointer is decre- 
mented a second time. The flag register is copied to the byte at the memory 
address referenced by the current stack-pointer position. 


Flags affected: none 


FUSH BC <PUSH R> 
FUSH DE <PUSH D> 
FUSH HL <PUSH H> 


Store the referenced double register in memory as follows. The stack pointer 
is decremented, then the byte in the specified high-order register B, D, or H 
is copied to the memory location referenced by the stack pointer. The stack 
pointer is decremented a second time. The byte in the low-order position C, 
E, or L is moved to the byte referenced by the current value of the stack 
pointer. 


Flags affected: none 
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PUSH IX <no 8080> 
PUSH IY <no 8080> 


The indicated index register is copied to the top of the stack. The stack 
pointer is decremented twice. 


Flags affected: none 


RES bs CHL) <no 8080> 
RES bs (IXtdd) <no 8080> 
RES bs (IY+tdd) <no 8080> 


Reset bit b of the memory byte referenced by the second operand. Bit b 
can range from zero through 7. 


Flag reset: N 
Other flags affected: none 


RES ber <no 8080> 
Reset bit b of register r to avalue of zero. Bit b can range from zero through 7. 


Flag reset: N 
Other flags affected: none 


RET < RET > 


Return from a subroutine. The top of the stack is moved into the program 
counter. The stack pointer is incremented twice. 


RET Cc < RC > 
RET M < RM > 
RET NC < RNC > 
RET NZ < RNZ > 
RET P < RP > 
RET PE < RPE > 
RET FO < RPO > 
RET Z < RZ > 


Conditional return from a subroutine. If the condition is met, the top of 
the stack is moved into the program counter. The stack pointer is incre- 
mented twice. 


C means carry flag set (carry) 

M means sign flag set (minus) 

NC means carry flag reset (not carry) 
NZ _ means zero flag reset (not zero) 

P means sign flag reset (plus) 

PE means parity flagset (parity even) 
PO means parity flag reset (parity odd) 
Z means zero flag set (zero) 
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RETI <no 8080> 


Return from maskable interrupt. 


RETN <no 8080> 


Return from nonmaskable interrupt. 


The following RL and RLA instructions rotate bits to the left through carry. 
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carry redister 


RL CHL) <no 8080> 


The memory byte referenced by the HL pair is rotated left through carry. 
The carry flag moves into bit zero. Bit 7 moves to the carry flag. 


Flags affected: C, P,S, Z 
Flags reset: H, N 


RL (IX+dd) <no 8080> 
RL (IY¥+dd) <no 8080> 


The memory byte referenced by the sum of the index register and the dis- 
placement is rotated left through carry. The carry flag moves into bit zero. 
Bit 7 moves to the carry flag. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RL r <no 8080> 


The byte in register r is rotated left through carry. The carry flag moves into 
bit zero. Bit 7 moves to the carry flag. Note: the instruction RL A performs 
the same task that the separate instruction RLA does, but the former takes 
twice as long as the latter. 


Flags affected: C, P,S, Z 
Flags reset: H, N 


RLA < RAL > 


The byte in the accumulator is rotated left through carry. The carry flag 
moves to bit zero. Bit 7 of the accumulator moves to the carry flag. 
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Flag affected: C 
Flags reset: H, N 


The following RLC and RLCA instructions rotate bits to the left. 
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carry resister 
RLC CHL) <no 8080> 


The byte referenced by the HL pair is rotated left circularly. Bit 7 moves to 
both the zero bit and to the carry flag. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RLC (IX+dd) <no 8080> 
RLC (IY¥+dd) <no 8080> 


The byte referenced by the specified index register plus the displacement is 
rotated left circularly. Bit 7 moves to both bit zero and the carry flag. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RLC r <no 8080> 


The byte in register r is rotated left circularly. Bit 7 moves to both bit zero 
and the carry flag. Note: RLC A performs the same task that another in- 
struction RLCA does, but the former instruction takes twice as long as the 
latter. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RLCA < RLC > 


The accumulator is rotated left circularly. Bit 7 moves to both bit zero and 
the carry flag. 


Flag affected: C 
Flags reset: H, N 


RLD <no 8080> 


A 4-bit rotation over 12 bits. The low 4 bits of A move to the low 4 bits of 
the memory location referenced by the HL pair. The original low 4 bits of 
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memory move to the high 4 bits. The original high 4 bits move to the low 
4 bits of A. This instruction is used for BCD operations. 


Flags affected: P, S, Z 
Flags reset: H, N 
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The following RR and RRA instructions rotate bits to the right through 
carry. 
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RR (HL) <no 8080> 


The memory byte pointed to by the HL pair is rotated right through carry. 
Carry moves to bit 7. Bit zero moves to the carry flag. 


Flags affected: C, P,S, Z 
Flags reset: H, N 


RR (IX+dd) <no 8080> 
RR (IY+dd) <no 8080> 


The memory byte pointed to by the specified index register plus the offset 
is rotated right through carry. The carry flag moves to bit 7. Bit zero moves 
to the carry flag. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RR r <no 8080> 


The byte in register r is rotated right through carry. Carry moves to bit 7. 
Bit zero moves to the carry flag. Note: RR A performs the same task that 
another instruction RRA does, but the former instruction takes twice as 
long as the latter. 


Flags affected: C, P, S, Z 
Flags reset: H, N 
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RRA < RAR > 


The accumulator is rotated right through carry. The carry flag moves to 
bit 7. Bit zero moves to the carry flag. 


Flag affected: C 
Flags reset: H, N 


The following RRC and RRCA instructions rotate bits to the right. 
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RRC CHL) <no 8080> 


The memory byte pointed to by the HL pair is rotated right circularly. Bit 
zero moves to both the carry flag and bit 7. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RRC (IXtdd) <no 8080> 
RRC (IY¥+dd) <no 8080> 


The memory byte pointed to by the index register plus the offset is rotated 
right circularly. Bit zero moves to both the carry flag and bit 7. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RRC r <no 8080> 


The byte in register r is rotated right circularly. Bit zero moves to both the 
carry flag and bit 7. Note: RRC A performs the same task that another 
instruction RRCA does, but the former instruction takes twice as long as 
the latter. 


Flags affected: C,P,S, Z 
Flags reset: H, N 


RRCA < RRC > 


The accumulator is rotated right circularly. Bit zero moves to both the carry 
flag and bit 7. 


Flag affected: C 
Flags reset: H, N 
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RRD <no 8080> 


A 4-bit rotation over 12 bits. The low 4 bits of A move to the high 4 bits of 
the memory location referenced by the HL pair. The original high 4 bits of 
memory move to the low 4 bits. The original low 4 bits move to the low 4 
bits of A. This instruction is used for BCD operations. 


Flags affected: P,S, Z 
Flags reset: H, N 


Jom pem—>— | [penn 
! ! ! - ! 
| mmm [-—-----— !  etesteateateteaten  F teaheaeateateateatan ! 
! 4 bits ! 4 bits ! ! 4 bits ! 4 bits ! 
| mm mm Ye ee me !  Reteteataatoteatend Clete ! 
accumulator ! memory ! 
 adeat Sotetetetenteniente feccen- <-! 
RST OOH <RST O> 
RST O8H <RST 1> 
RST 10H <RST 2> 
RST 18H <RST 3> 
RST 20H <RST 4> 
RST 28H <RST S> 
RST 30H <RST 6> 
RST 38H <RST 7> 


These restart instructions generate one-byte subroutine calls to address given 
in the Z-80 operand. 


SBC Ay(HL) <SEB M> 


Subtract the carry flag and the memory byte pointed to by the HL pair from 
the accumulator. The result is placed in the accumulator. Some Z-80 assem- 
blers allow the 8080 mnemonic of SBB to be used as an alternate Z-80 
mnemonic for this instruction. 


Flags affected: C, H, O,S, Z 


Flag set: N 
SBC Ay (IX+dd) <no 8080> 
SBC Ay (1Y¥tdd) <no 8080> 


Subtract the carry flag and the memory byte pointed to by the sum of the 
index register and displacement from the accumulator. The result is placed 
in the accumulator. 


Flags affected: C,H, O, 8, Z 
Flag set: N 
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SBC Arr <SBB r> 


Subtract the carry flag and the specified CPU register from the accumulator. 
The result is placed in the accumulator. Some Z-80 assemblers allow the 
8080 mnemonic of SBB to be used as an alternate Z-80 mnemonic for this 
instruction. 


Flags affected: C,H, O,S, Z 
Flag set: N 


SBC Aynn <SBI nn> 


Subtract the immediate byte (the second operand) and the carry flag from 
the accumulator. The result is placed in the accumulator. Some Z-80 assem- 
blers allow the 8080 mnemonic of SBB to be used as an alternate Z-80 mne- 
monic for this instruction. 


Flags affected: C,H, O,S, Z 


Flag set: N 

SBC HL » BC <no 8080> 
SBC HL » DE <no 8080> 
SBC HL » HL <no 8080> 
SBC HL »SP <no 8080> 


Subtract the specified CPU double register and the carry flag from the HL 
register pair. The result is placed in HL. You may need to reset the carry 
flag with an OR A operation before using these instructions. 


Flags affected: C,H, O, 8S, Z 
Flag set: N 


SCF < STC > 


Set the carry flag. There is no equivalent reset command. However, the carry 
flag can be reset with the XOR A instruction, or with the pair of instruc- 
tions SCF and CCF. 


Bit set: C 
Bits reset: H, N 


SET by CHL) <no 8080> 
SET by (IX+dd) <no 8080> 
SET bs (IY¥tdd) <no 8080> 


Set bit b of the memory byte referenced by the second operand. Bit b can 
range from zero through 7. 


Flag reset: N 
Other flags affected: none 
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SET ber <no 8080> 
Set bit b of register r. Bit b can range from zero through 7. 


Flag reset: N 
Other flags affected: none 


The following SLA instructions shift bits to the left. 


I--—4 | === |---| === |---| --- 1 --- 1 --- 1 ---! 
ne ee oc cn <r) 
!---! Jaan fen Pann Pan f= = | --- P--- 1 -- 


carry resister 


SLA (HL) <no 8080> 


Perform an arithmetic shift left on the memory byte pointed to by the HL 
pair. Bit 7 is moved to the carry flag. A zero is moved into bit zero. This 
operation doubles the original value. 


Bits affected: C,P,S, Z 
Bits reset: H, N 


SLA (IX+dd) <no 8080> 
SLA (1Y+dd) <no 8080> 


Perform an arithmetic shift left on the memory byte pointed to by the index 
register plus the displacement. Bit 7 is moved to the carry flag. A zero is 
moved into bit zero. This operation doubles the original value. 


Bits affected: C,P,S, Z 
Bits reset: H, N 


SLA r <no 8080> 


Perform an arithmetic shift left on register r. Bit 7 is moved to the carry 
flag. A zero is moved into bit zero. This operation doubles the original value. 
Note: SLA A performs the same task that another instruction ADD A,A 
does, but the former instruction takes twice as long as the latter. 


Bits affected: C, P, S, Z 
Bits reset: H, N 


The following SRA instructions shift bits to the right. 


J--= |---| === |---| = === F--- 1 ---! }---! 
es > ay > > MD ata ae ae 
' |---| --= | === P= = |---| --- P--- 1 ---! }---! 


! ! resister carry 
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SRA CHL) <no 8080> 


Perform an arithmetic shift right on the memory byte pointed to by the HL 
pair, Bit zero moves to the carry flag. Bit 7 is duplicated in bit 6. 


Bits affected: C, P, S, Z 
Bits reset: H, N 


SRA (IX+dd) <no 8080> 
SRA (IY+dd) <no 8080> 


Perform an arithmetic shift right on the byte pointed to by the index register 
plus the displacement. Bit zero moves to carry and bit 7 is duplicated into 
bit 6. 


Bits affected: C, P, S, Z 
Bits reset: H, N 


SRA r <no 8080> 


Perform an arithmetic shift right on register r. Bit zero moves to carry and 
bit 7 is duplicated into bit 6. The operation effectively halves the register 
value. The carry flag represents the remainder. The carry flag is set if the 
original number was odd. 


Bits affected: C, P,S, Z 
Bits reset: H, N 


The following SRL instructions shift bits to the right. 


O--> ! —> -—> > => > -> > ee menm >! ! 
J--— |---| --- | ~-— | --- |---| | [---!} 
resdister carry 

SRL CHL) <no 8080> 


Perform a logical shift right on the byte pointed to by the HL register pair. 
A zero bit is moved into bit 7. Bit zero moves to the carry flag. 


Bits affected: C, P, Z 
Bits reset: H, N,S 


SRL (IXt+dd) <no 8080> 
SRL (1Ytdd) <no 8080> 


Perform a logical shift right on the byte pointed to by the index register 
plus the displacement. A zero bit is moved into bit 7. Bit zero moves to the 


carry flag. 
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Bits affected: C, P, Z 
Bits reset: H, N,S 


SRL r <no 8080> 


Perform a logical shift right on register r. A zero bit is moved into bit 7, 
Bit zero moves to the carry flag. 


Bits affected: C, P, S, Z 
Bits reset: H, N 


SUB CHL) <SUB M> 


Subtract the memory byte referenced by the HL pair from the accumulator. 
The result is placed in the accumulator. 


Flags affected: C, H, O, 8, Z 


Flag set: N 
SUB (1X+dd) <no 8080> 
SUB (1Y+dd) <no 8080> 


Subtract the memory byte referenced by the index register plus the dis- 
placement from the value in the accumulator. The result is placed in A. 


Flags affected: C,H, O,S, Z 
Flag set: N 


SUB r <SUB T> 


Subtract the specified CPU register from the accumulator. The result is 
placed in the accumulator. Notice that Z-80 SUB mnemonic has only one 
operand, whereas there are two operands in the corresponding 8-bit ADC, 
ADD, and SBC mnemonics. The destination operand for all four of these 
instructions is always the accumulator. Consequently, the first operand is 
optional with some assemblers. 


Flags affected: C,H, O,S, Z 
Flag set: N 


SUB nn <SUI mn> 


Subtract the immediate byte nn from the accumulator. The result is placed 
in the accumulator. 


Flags affected: C, H, O,S, Z 
Flag set: N 
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XOR CHL) <XRA M> 


Perform a logical exclusive OR with the accumulator and the byte referenced 
by the HL pair. The result is placed in the accumulator. 


Flags affected: P,S, Z 
Flags reset: C, H, N 


XOR (IX+dd) <no 8080> 
XOR (1TY¥+dd) <no 8080> 


Perform a logical exclusive OR with the accumulator and the byte referenced 
by the sum of specified index register and the displacement. The result is 
placed in the accumulator. 


Flags affected: P,S, Z 
Flags reset: C, H, N 


XOR r <XRA Ty 


Perform a logical exclusive OR with the accumulator and register r. The 
result is placed in the accumulator. The XOR A instruction is an efficient 
way to zero the accumulator, although all the flags are then reset. XOR A is 
also used to reset the carry flag. 


Flags affected: P,S, Z 
Flags reset: C, H, N 


’ 


XOR nn <XRI nn> 


Perform a logical exclusive OR with the accumulator and the byte nn. The 
result is placed in the accumulator. 


Flags affected: P,S, Z 
Flags reset: C, H, N 


APPENDIX I 


Abbreviations and Acronyms 


A/D 
APL 
ASCII 
BCD 
BDOS 
BIOS 
Bit 
BJT 
CBIOS 
CCD 
CCP 
CMOS 
COBOL 
CP/M 
CPU 
CRC 
CRT 
CTS 
D/A 
DCD 
DDT 
DMA 
DOS 
ECL 
EOF 
EPROM 
FCB 
FDOS 
FET 
FIFO 
FORTRAN 


Analogue to Digital 

A Programming Language 

American Standard Code for Information Interchange 
Binary-Coded Decimal 

Basic Disk-Operating System (CP/M) 
Basic Input/Output System (CP/M) 
BInary digiT 

Bipolar Junction Transistor 
Customized Bios (CP/M) 
Charge-Coupled Device 

Console Command Processor (CP/M) 
Complementary Metal-Oxide Semiconductor 
COmmon Business-Oriented Language 
Control Program for Microcomputers 
Central Processing Unit 
Cyclical-Redundancy Check 

Cathode Ray Tube 

Clear To Send 

Digital to Analogue 

Data-Carrier Detect 

Dynamic Debugging Tool (CP/M) 
Direct Memory Access 
Disk-Operating System 
Emitter-Coupled Logic 

End Of File 

Erasable PROM 

File Control Block (CP/M) 

Full DOS (CP/M) 

Field-Effect Transistor 

First-In, First-Out 

FORmula TRANSslation 

Hertz (cycles per second) 

Integrated Circuit 

Insulated-Gate FET 
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IIL 
1/O 
JFET 
LCD 
LED 
LIFO 
LSB 
LSI 
MHz 
MODEM 
MOS 
MOSFET 
MSB 
NAND 
NOR 
OP AMP 
PIP 
PPL 
PROM 
PSW 
R/W 
RAM 
ROM 
RTS 
SCR 
SID 
TPA 
TTL 
TTY 
UART 
UJT 
XOR 


Integrated Injection Logic 
Input/Output 

Junction FET 

Liquid Crystal Display 
Light-Emitting Diode 

Last-In, First-Out 
Least-Significant Bit (or Byte) 
Large-Scale Integration 
Megahertz (million Hz) 
MODulator/DEModulator 
Metal-Oxide Semiconductor 
MOS FET 

Most Significant Bit (or Byte) 
Not AND 

Not OR 

OPerational AMPlifier 
Peripheral Interchange Program (CP/M) 
Phase-Locked Loop 
Programmable ROM 
Program-Status Word 
Read/Write 

Random-Access Memory 
Read-Only Memory 

Request To Send 
Silicon-Controlled Rectifier 
Symbolic Instruction Debugger (CP/M) 
Transient Program Area (CP/M) 
Transistor-Transistor Logic 
Teletype 

Universal Asynchronous Receiver/Transmitter 
UniJunction Transistor 
Exclusive OR 


APPENDIX J 


Undocumented 
Z-80 Instructions 


The Z-80 CPU contains two 16-bit index registers called IX and IY. All of 
the official Zilog instructions which refer to IX and IY are 16-bit operations. 
For example, the IX register can be assigned the constant value 1234 with 
the LD instruction 


Lo IX1234H 


And the contents of the IY register can be saved on the stack with a PUSH 
operation. 


FUSH IY 


A perusal of the numerically ordered Z-80 instructions, given in Appendix F, 
reveals that sequences beginning with the byte DD hex refer to operations 
involving the IX register. Similarly, the byte FD hex signifies an IY operation. 

In addition to the 16-bit operations, there are many 8-bit operations 
that can be performed with the Z-80 index registers. These instructions are 
not shown in Appendix F because they have not been officially documented 
by Zilog. All of these 8-bit [IX and IY instructions follow the same pattern. 
The first byte of the IX operation codes is DD hex and the first byte of the 
IY operation codes is FD hex. The remaining byte of the instruction is a 
regular Z-80 operation which refers to the H or L register. But, in this case, 
H now refers to the high 8 bits of the index register and L refers to the low 
8 bits. 

As an example, consider the Z-80 instruction: 


LI H»B 


which moves the byte in register B into the H register. If this operation code 
is preceded by a DD hex byte, then the B register is moved into the high 
8 bits of the IX register. An assembler that incorporated these undocumented 
instructions might generate the following source code. 


60 LD H»B sMOVE B TO H 

nndé0 LD XH»B sMOVE B TO HIGH IX 
DD6B LD XLvE sMOVE E TO LOW Ix 
FD67 LD YHsA sMOVE A TO HIGH IY 
FD69 LD YLrC sMOVE C TO LOW IY 
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But, except for Allen Ashley’s PDS assembler, these XH, XL, YH, and YL 
symbols have not actually been incorporated into Z-80 assemblers. The 
undocumented instructions encompass all of the 8-bit LD op codes involv- 
ing the H and L registers. These include the register-to-register moves 


Lo Her 
Lo Ler 
Lo rH 
Lo rel 


where r is one of the general-purpose registers A, B, C, D, and E. The in- 
structions 


Lo L»H and 
Lo Hel 


are also included. In this case the H and L refer respectively to the high 
8 bits and the low 8 bits of the same index register. Thus, the instruction 


Lo LyH 


preceded by a DD byte will move the high 8 bits of the IX register into the 
low 8 bits. The regular H and L registers cannot be operands for these moves. 
Move-immediate instructions are not included in the new instructions. 
Furthermore, 8-bit transfers cannot be made from one index register to the 
other. 

Many of the other 8-bit register operations can be utilized in this way. 
In addition to the above LD instructions, these include the following. 


ADC AvH ADC ArL 
ADD AvH Ant AsL 
AND H ANI L 
CP H CP L 
DEC H DEC L 
INC H INC L 
OR H OR L. 
SBC AvH SBC AsL 
SUB H SUB L 
XOR H XOR L 


The rotations and shifts, the bit manipulations that set, reset and test, and 
the input and output operations are not included. 

All of these undocumented operations can be produced with a regular 
Z-80 assembler. One method is to generate the initial DD or FD hex with 
the DEFB directive. Then, the corresponding regular Z-80 instruction fol- 
lows. For example, the following two lines will generate the instruction 
needed to move the accumulator into the high half of IX. 


DEFB ODDH sSET FOR IX 
Lo H»A sMOVE A TO XH 


APPENDIX H 


Alternately, a macro can be used. The definition could be 


LDX MACRO REG1*REG2 
DEFB ODDH 
LD REG1»REG2 
ENDM 


Then the macro call 
LOX H»A 


will generate the desired code. 
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Accumulator, 3 
Acoustical coupler, 65 
Acronyms, 311 
Active high, 93 
Analog-to-digital, 188 
Arithmetic shift, 76, 155, 180, 307 
ASCII, 20, 66, 150 
character set, 253 
Assembler, 2, 86 
Autostart tape, 201 


Base conversion, 150 

BCD, 19, 168 

Binary, 17 

Binary coded decimal, 19, 168 
BIOS (CP/M), 91, 216 

Block move, 13, 111, 297 
Branch table, 107 

Buffered input, 55 

Bus, 1 


Carry flag, 5,10 
Checksum, 68, 188 
Clock routine, 241 
Code, operation, 1 
Cold start, 103 
Compare 7, 123 
Complement, 21 
Concatination, 72 
Conditional branch, 12, 287, 293 
Control character, 93, 99, 100 
Conversion, number base, 150 
CP/M, 51, 86, 91, 128, 175, 201, 214 
CPU, 1 
Crazy octal, 164, 182 
Cross reference 
8080 to Z-80, 280 
Z-80 to 8080, 283 


DAA, 179 

Data port, 49 

Data ready, 91 

Debugger, 94 

Decimal adjust accumulator, 179 
Decrement, 8, 10 


Delay, after carriage return, 148 
Delimiter, 151 

De Morgan’s theorem, 28 
Digital-to-analog, 188 

Directive, 87 

DOS, 214 

Double precision arithmetic, 22, 180 
Double register, 3, 10, 13 
Doubling, 15, 155, 307 
Dummy variable, 70 

Dump, memory, 95 


Echo, 95 
Editor, 86, 143 
Exclusive OR, 26 


FCB (CP/M), 226, 242 
File control block, 226, 242 
Filename, 204 
Fixed entry, 152 
Flags, 3, 6, 10 
I/O, 50, 71, 93 
Free entry, 152 
Full duplex, 65 
Function number (CP/M), 216 


Gates, 21 
GO program, 226 


Halving, 15 

Handshake, 49 

Hex arithmetic, 119 

Hex format, 201 
Hexadecimal numbers, 17 
High-level language, 2, 214 


Increment, 8, 10 

Index register, 313 

Input, 14, 48, 117, 146 

Instruction set 
alphabetic, 8080, 258 
alphabetic, Z-80, 264 
numeric, 8080, 261 
numeric, Z-80, 272 
details, 283 
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Intel hex format, 201 
Interrupt-driven keyboard, 55 
Interrupt register, 11 
Interrupts, 52 

IOBYTE (CP/M), 217, 220 


Jump, relative, 12, 144 


Label, 2 

local, 82 
Labels, readable, 203 
Leading-zero suppression, 173 
LIFO stack, 30 
List routine, 229 
Loader routine, 125 
Logical AND, 23, 224 
Logical devices, 215 
Logical exclusive OR, 26 
Logical operations, 7, 20 
Logical OR, 23 
Logical shift, 15 
Looping, 50 


Macros, 69, 143 
Magnetic tape, 187 
Masking AND, 25, 50, 178, 220 
Memory allocation (CP/M), 217 
Memory 

map, 255 

pointer, 2,55,113 

test, 120 
Memory-mapped port, 48 
Mnemonic, 2 
Modem, 64 
Monitor, 85, 128 
Movement of data, 111 
Multiplication, 15, 157 


NAND gate, 26 
Nibble, 178 
NOR gate, 26 
Nulls, carriage return, 
77, 93, 219 
Number-base conversion, 150 


Object program, 2 

Octal, 16, 163, 180 

Offset, 202 

One’s complement, 21 

Opcode, 1 

Operand, 2 

Operation code, 1 

Output, 14, 48, 71, 117, 146, 215 


Packed BCD, 19, 168 
Page, memory, 105 
Paper tape, 187 
Parallel port, 49 
Parity, 66 
Passing data, 37, 39 
Peripheral, 1, 14 
port, 48,117,146 
Physical devices, 218 
PIP (CP/M), 143, 230 
Pointer, 2,12, 55 


Polling, 52 

POP, 31 

Port, I/O, 48, 117, 146 
initialization, 146 

Printer routine, 147 

Program counter, 3, 11, 36 

Program status word, 3, 34 

PSW, 3, 34 

PUSH, 31 


Register 
flag, 3 
memory, 5 
refresh, 11 
saving, 33 
status, 2 
Register pair, 3 
Registers 
8080, 3 
Z-80, 11 
Relative jump, 12, 144 
Resetting a bit, 25 
Rotation, 9 
RST instruction, 53 


Scroll, 64, 99 
Searching, 113,115 
Serial port, 49 
Setting a bit, 24 
Shift, 14, 76, 155, 307 
Signed number, 6, 15 
Source program, 2, 214 
Split octal, 164, 182 
Spooling, 52 
Stack, 30 
automatic placement, 45 
saving registers on, 33 
setting up new, 40 
storing data on, 31 
Stack pointer, 31, 109 
STAT (CP/M), 225 
Status port, 49 
String, 150 
Subroutine call, 35, 287 
Subtraction, 22,177 


Table, command branch, 107 

Tape recording, 187 

Tape, test, 212 

Telephone modem, 64 

Top-down method, 85 

Truth table, 21 

Two’s complement, 21, 74, 75, 177, 201 


Unconditional branch, 12 
Undocumented Z-80 instructions, 313 
Unsigned number, 6 


Vectors, 103, 219 
Vectored interrupt, 53 


Warm start, 103 


Z-80 instruction macros, 73 
Z-80 registers, 11 
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